raw-angle from scale-rotated-ellipse

Time bar (total: 1.1min)

start0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage

analyze1.8s (2.5%)

Memory
33.3MiB live, 2 773.8MiB allocated; 396ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
0.6%0.6%99.2%0.2%0%0%0%11
0.7%0.7%99.1%0.2%0%0%0%12
Compiler

Compiled 171 to 45 computations (73.7% saved)

sample7.8s (11.3%)

Memory
64.6MiB live, 14 034.4MiB allocated; 2.1s collecting garbage
Samples
3.1s2 746×1valid
1.8s1 201×2valid
1.5s4 169×0valid
311.0ms140×3valid
30.0ms80×0invalid
Precisions
Click to see histograms. Total time spent on operations: 6.2s
ival-div: 1.4s (22.5% of total)
ival-pow2: 1.1s (18.1% of total)
ival-mult: 783.0ms (12.7% of total)
ival-cosu: 766.0ms (12.4% of total)
ival-sinu: 709.0ms (11.5% of total)
adjust: 679.0ms (11% of total)
ival-sub: 254.0ms (4.1% of total)
ival-add: 203.0ms (3.3% of total)
ival-sqrt: 129.0ms (2.1% of total)
ival-atan: 84.0ms (1.4% of total)
ival-pi: 36.0ms (0.6% of total)
exact: 14.0ms (0.2% of total)
ival-assert: 3.0ms (0% of total)
Bogosity

explain2.2s (3.2%)

Memory
-240.6MiB live, 2 474.0MiB allocated; 1.2s collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1350-3(1.0937804556343912e-98 1.7422484279122381e-192 6.053656997968495e-224 -1.794038756626019e-153 6.686317438825927e+51)(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
1180-0-(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1180-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1000-0-(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
590-0-(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
590-0-(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
410-2(-7.448425584572898e+116 -5.53642912758631e-10 -8.268347327873719e-301 -1.3832591355355297e+69 -4.468561773371468e+226)(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
360-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)
320-1(1.884038334563243e-157 6.799237751476027e-254 -8.382080788275538e-57 3.668355501319069e-82 -2.315355867852326e-121)(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
301(1.2913847820604881e-188 -2.2510763734705205e-244 6.820223668399199e-202 1.875776861201109e-165 1.2597570993642763e+178)1(2.6361283035446822e-288 2.9189532668220677e-155 1.9629246906801296e+303 -2.170627297582741e-278 2.8905755881954205e-68)(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
290-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))))
200-1(1.4447564926032283e-212 1.4324637601695901e-297 1.8832616323182283e+225 2.0406684016612047e-107 -2.198759270967376e-150)(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
190-2(1.4447564926032283e-212 1.4324637601695901e-297 1.8832616323182283e+225 2.0406684016612047e-107 -2.198759270967376e-150)(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
170-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
120-2(-5.876782423460662e-307 5.3911829830943176e-36 1.3249432953181903e-181 5.393482263007644e+225 -1.5984331398714257e-114)(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
10-1(-7.31721220855343e-115 2.5464656140464926e-113 5.309783147133043e+149 -7.051890088732145e+262 -1.6628267163273346e-49)(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
00-0-x-scale
00-0-(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
00-0-(pow.f64 b #s(literal 2 binary64))
00-0-(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
00-0-(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-#s(literal 180 binary64)
00-0-(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-angle
00-0-#s(literal 2 binary64)
00-0-(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
00-0-(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-b
00-0-(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
00-0-a
00-0-(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
00-0-(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(pow.f64 a #s(literal 2 binary64))
00-0-(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
00-0-(PI.f64)
00-0-(/.f64 angle #s(literal 180 binary64))
00-0-(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
00-0-y-scale
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1180
sin.f64(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1180
-.f64(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))nan-rescue790
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow105
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow102
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow56
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow61
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow80
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow148
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow30
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow92
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow88
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow102
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow30
↳(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))overflow172
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow148
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow105
↳(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))overflow172
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow88
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow84
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow56
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow61
↳(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))overflow148
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow88
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))overflow112
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow80
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow92
↳(pow.f64 a #s(literal 2 binary64))overflow56
/.f64(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))o/o710
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow148
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow60
↳(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))overflow172
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow148
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow210
↳(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))overflow103
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow204
↳(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))overflow172
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow176
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow84
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow166
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow112
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow122
↳(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))overflow148
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow88
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow80
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))overflow112
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow160
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow184
↳(pow.f64 a #s(literal 2 binary64))overflow56
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow88
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 a #s(literal 2 binary64))overflow56
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow84
-.f64(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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-rescue590
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow105
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow61
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow80
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow30
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) 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)overflow102
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow56
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow88
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
-.f64(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))nan-rescue590
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow102
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow56
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow88
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow105
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow61
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow80
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow30
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow92
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))n*o290
sqrt.f64(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))oflow-rescue240
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow102
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow30
↳(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))overflow172
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow148
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow105
↳(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))overflow172
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow88
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow84
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow56
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow61
↳(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))overflow148
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow88
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))overflow112
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow80
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow92
↳(pow.f64 a #s(literal 2 binary64))overflow56
/.f64(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))u/u240
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))underflow8
↳(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))underflow23
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))underflow8
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow82
↳(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))underflow48
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow72
↳(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))underflow23
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow50
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow19
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow31
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow54
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow19
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow124
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow70
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow126
↳(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))underflow8
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow39
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow204
↳(pow.f64 b #s(literal 2 binary64))underflow63
↳(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))underflow67
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow56
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow200
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow58
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow48
↳(pow.f64 a #s(literal 2 binary64))underflow62
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow19
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow39
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(pow.f64 b #s(literal 2 binary64))underflow63
↳(pow.f64 a #s(literal 2 binary64))underflow62
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow19
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow31
-.f64(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))cancellation210
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)o/n210
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 a #s(literal 2 binary64))overflow56
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n200
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow56
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
-.f64(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))nan-rescue170
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 a #s(literal 2 binary64))overflow56
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n160
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow61
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow80
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow30
sqrt.f64(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))uflow-rescue150
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.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)underflow36
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))underflow23
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))underflow8
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow41
↳(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))underflow23
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow25
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow19
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow31
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow27
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow19
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow62
↳(*.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))underflow63
↳(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))underflow8
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow39
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow102
↳(pow.f64 b #s(literal 2 binary64))underflow63
↳(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))underflow67
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow28
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow100
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow29
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow24
↳(pow.f64 a #s(literal 2 binary64))underflow62
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)o/n130
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 a #s(literal 2 binary64))overflow56
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow84
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n130
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow61
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow80
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow30
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow92
/.f64(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))u/n110
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))underflow8
↳(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))underflow23
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))underflow8
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow82
↳(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))underflow48
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow72
↳(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))underflow23
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow50
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow19
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow31
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow54
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow19
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow124
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow70
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow126
↳(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))underflow8
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow39
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow204
↳(pow.f64 b #s(literal 2 binary64))underflow63
↳(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))underflow67
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow56
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow200
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow58
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow48
↳(pow.f64 a #s(literal 2 binary64))underflow62
/.f64(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))o/n110
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow148
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow60
↳(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))overflow172
↳(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow148
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow210
↳(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))overflow103
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow204
↳(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))overflow172
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow176
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow84
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow166
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow112
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow122
↳(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))overflow148
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow88
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow80
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))overflow112
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow160
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow184
↳(pow.f64 a #s(literal 2 binary64))overflow56
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))underflow63
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow28
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow100
/.f64(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))n/o90
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow100
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow88
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow71
↳(pow.f64 b #s(literal 2 binary64))overflow61
↳(pow.f64 a #s(literal 2 binary64))overflow56
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow100
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow84
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)u/n70
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow27
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow62
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow102
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow29
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)o/n70
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow56
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow88
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)u/n60
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow19
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow19
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(pow.f64 b #s(literal 2 binary64))underflow63
↳(pow.f64 a #s(literal 2 binary64))underflow62
/.f64(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))n/u60
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow19
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow39
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(pow.f64 b #s(literal 2 binary64))underflow63
↳(pow.f64 a #s(literal 2 binary64))underflow62
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow19
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow31
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)u/n20
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow63
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow28
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow100
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow24
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)u/n20
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow62
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow102
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow29
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow25
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow27
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n10
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow19
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow35
↳(pow.f64 b #s(literal 2 binary64))underflow63
↳(pow.f64 a #s(literal 2 binary64))underflow62
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow19
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow31
Confusion
Predicted +Predicted -
+2210
-1916
Precision
0.9208333333333333
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+22100
-19016
Precision?
0.9208333333333333
Recall?
1.0
Freqs
test
numberfreq
016
152
232
353
437
536
624
76
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
173.0ms96×2valid
170.0ms164×1valid
140.0ms242×0valid
21.0ms10×3valid
Compiler

Compiled 3 179 to 139 computations (95.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 387.0ms
ival-cosu: 75.0ms (19.4% of total)
ival-pow2: 63.0ms (16.3% of total)
ival-mult: 60.0ms (15.5% of total)
ival-sinu: 52.0ms (13.4% of total)
ival-div: 51.0ms (13.2% of total)
adjust: 39.0ms (10.1% of total)
ival-sub: 16.0ms (4.1% of total)
ival-add: 14.0ms (3.6% of total)
ival-sqrt: 7.0ms (1.8% of total)
ival-atan: 5.0ms (1.3% of total)
ival-pi: 2.0ms (0.5% of total)
ival-true: 1.0ms (0.3% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)

preprocess287.0ms (0.4%)

Memory
9.6MiB live, 192.0MiB allocated; 24ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04523609
110883553
240283553
045169
083169
1140169
2397169
32286169
08324164
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 (neg.f64 a) (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 a y-scale)) (*.f64 (*.f64 (neg.f64 b) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (/.f64 b y-scale)))) (neg.f64 y-scale)) (hypot.f64 (*.f64 (fabs.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 b a)) (-.f64 b a)) (*.f64 x-scale y-scale)))) (fma.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (neg.f64 x-scale)) (-.f64 (*.f64 (/.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 x-scale))) (/.f64 (fma.f64 (*.f64 (neg.f64 a) (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 a y-scale)) (*.f64 (*.f64 (neg.f64 b) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (/.f64 b y-scale)))) (neg.f64 y-scale)))))) (/.f64 (fma.f64 (*.f64 (neg.f64 b) (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 b x-scale)) (*.f64 (*.f64 (neg.f64 a) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (/.f64 a x-scale)))) (neg.f64 x-scale))) (/.f64 y-scale (*.f64 (fma.f64 (/.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) x-scale) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 (/.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) x-scale) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 b a)) (-.f64 b a)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
Symmetry

(abs a)

(abs b)

Compiler

Compiled 169 to 45 computations (73.4% saved)

eval0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler

Compiled 0 to 5 computations (-∞% saved)

prune2.0ms (0%)

Memory
3.0MiB live, 3.0MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶14.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
Compiler

Compiled 169 to 45 computations (73.4% saved)

series547.0ms (0.8%)

Memory
49.5MiB live, 938.9MiB allocated; 113ms collecting garbage
Counts
45 → 401
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
y-scale
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
x-scale
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx a #s(hole binary64 a))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx b #s(hole binary64 b))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (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)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (pow a 2) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale)))))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) y-scale) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) y-scale))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale))))))) (/ (pow a 2) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow a 2)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (+ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 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 a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2)))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow a 2) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow a 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 a))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole 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)))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)))))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) x-scale) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) x-scale))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale))))))) (/ (pow b 2) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow b 2)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* (pow angle 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (pow b 2))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* 1/22674816000000 (* a (* (pow angle 2) (pow (PI) 5))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* a (* (pow angle 2) (pow (PI) 7)))) (* 1/22674816000000 (* a (pow (PI) 5)))))))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow b 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 b))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* -1/64800 (* (pow angle 2) (* b (pow (PI) 2)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* 1/25194240000 (* (pow angle 2) (* b (pow (PI) 4)))))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (* b (pow (PI) 6)))) (* 1/25194240000 (* b (pow (PI) 4))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 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)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-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))))))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* 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) #s(hole binary64 (* 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))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole 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)))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* 2 (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/17496000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/90 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/11337408000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/15427944806400000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/11337408000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow x-scale 2) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
Calls

15 calls:

TimeVariablePointExpression
68.0ms
angle
@inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
42.0ms
angle
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
41.0ms
a
@inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
39.0ms
b
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
37.0ms
a
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))

rewrite575.0ms (0.8%)

Memory
45.1MiB live, 899.7MiB allocated; 191ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02541107917
0262899479
0811497351
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
446 → 492
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
y-scale
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
x-scale
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx a #s(hole binary64 a))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx b #s(hole binary64 b))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (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)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (pow a 2) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale)))))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) y-scale) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) y-scale))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale))))))) (/ (pow a 2) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow a 2)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (+ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 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 a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2)))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow a 2) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow a 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 a))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole 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)))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx angle #s(hole binary64 angle))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)))))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) x-scale) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) x-scale))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale))))))) (/ (pow b 2) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow b 2)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* (pow angle 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (pow b 2))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* 1/22674816000000 (* a (* (pow angle 2) (pow (PI) 5))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* a (* (pow angle 2) (pow (PI) 7)))) (* 1/22674816000000 (* a (pow (PI) 5)))))))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow b 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 b))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* -1/64800 (* (pow angle 2) (* b (pow (PI) 2)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* 1/25194240000 (* (pow angle 2) (* b (pow (PI) 4)))))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (* b (pow (PI) 6)))) (* 1/25194240000 (* b (pow (PI) 4))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 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)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-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))))))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* 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) #s(hole binary64 (* 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))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole 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)))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* 2 (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/17496000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/90 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/11337408000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/15427944806400000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/11337408000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow x-scale 2) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (neg.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)))
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))
(-.f64 (/.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)) (/.f64 (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)))
(-.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)) (pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) x-scale) (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale))) (*.f64 y-scale x-scale))
(-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale))
(/.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)
(/.f64 (neg.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))))) (neg.f64 y-scale))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale)
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) y-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))))))
(fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (*.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(pow.f64 (*.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(*.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))
a
(sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (neg.f64 angle) #s(literal -180 binary64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(*.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (*.f64 b (sin.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))
(exp.f64 (*.f64 (log.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) #s(literal 2 binary64)))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
y-scale
(/.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale)
(/.f64 (neg.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (neg.f64 x-scale))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale)
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) x-scale) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) x-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
(fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(*.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.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))))
(*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (*.f64 b (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 b (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(pow.f64 (*.f64 b (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 b (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(*.f64 b (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))
x-scale
(pow.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))))
(hypot.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale))) (*.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)))) (-.f64 (*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) (*.f64 (*.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))))))
(fma.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)))
(+.f64 (*.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)))
(*.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)))
(pow.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale) y-scale))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) y-scale) (*.f64 x-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))) y-scale))) (*.f64 x-scale y-scale))
(-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)))) x-scale) x-scale) (/.f64 (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (neg.f64 x-scale))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (*.f64 b b) (*.f64 a a)))
(-.f64 (*.f64 b b) (*.f64 a a))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) y-scale))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (*.f64 a (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx a a)
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) x-scale))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 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) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) y-scale))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) y-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (fma.f64 #s(literal -2 binary64) (*.f64 a a) (*.f64 #s(literal 2 binary64) (*.f64 b b))))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 b b))
#s(approx (- (pow b 2) (pow a 2)) (fma.f64 #s(literal -1 binary64) (*.f64 a a) (*.f64 b b)))
#s(approx (pow a 2) (*.f64 a a))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 a a) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (*.f64 a a) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (*.f64 a a) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) y-scale) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a a)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (*.f64 a a) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 a a)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 a a) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 a a) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 a a) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 a a) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))))) (pow.f64 a #s(literal 6 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 a a))) (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) y-scale))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a a))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 a a))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal -2 binary64) (*.f64 a a)))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 a a))) #s(literal 2 binary64))))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 #s(literal -1 binary64) (*.f64 a a)))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 b b) (*.f64 a a)) #s(literal 1 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx b b)
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (*.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))
#s(approx (- (pow b 2) (pow a 2)) (-.f64 (*.f64 b b) (*.f64 a a)))
#s(approx (pow b 2) (*.f64 b b))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (*.f64 b b) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (*.f64 b b) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (*.f64 b b) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b b)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 b b) (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 b b) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 b b) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (*.f64 b b) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 b b)) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 b b))) (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (*.f64 b b) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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) (*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b b)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 b b)) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (*.f64 b b) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (*.f64 b b))))))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))) angle))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 a a) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) y-scale) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) y-scale))) (/.f64 (*.f64 a a) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale))))) (/.f64 (*.f64 a a) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (fma.f64 (*.f64 angle angle) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) y-scale) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale)))))) (/.f64 (*.f64 a a) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 a a))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))))) (*.f64 a a)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (*.f64 a a)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (*.f64 a a)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (*.f64 a a))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))) (*.f64 a a)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 a a)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 a a)))
#s(approx (* a (cos (* (/ angle 180) (PI)))) a)
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 #s(literal -1/64800 binary64) (*.f64 a (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 a (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 a (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 a (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* (/ angle 180) (PI)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle))
#s(approx angle angle)
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (PI.f64)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 b b) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) x-scale) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) x-scale))) (/.f64 (*.f64 b b) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale))))) (/.f64 (*.f64 b b) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (fma.f64 (*.f64 angle angle) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) x-scale) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale)))))) (/.f64 (*.f64 b b) x-scale)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 b b))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b b)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (*.f64 b b)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (*.f64 b b)))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64)))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 a (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 a (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 a (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 a (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (*.f64 b b))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 b b)))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (*.f64 b b)))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (*.f64 b b)))
#s(approx (* b (cos (* (/ angle 180) (PI)))) b)
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.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) (*.f64 #s(literal 1/90 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) y-scale))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (/.f64 (PI.f64) x-scale) (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) y-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (/.f64 (PI.f64) x-scale) (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (/.f64 (PI.f64) x-scale) (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (fma.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (fma.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) x-scale))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/15427944806400000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) y-scale))
#s(approx (cos (* (/ angle 180) (PI))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (sin (* (/ angle 180) (PI))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) x-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale y-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))) x-scale)))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx x-scale x-scale)
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))))) (*.f64 x-scale x-scale)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) x-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)))
#s(approx y-scale y-scale)
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))) (*.f64 y-scale y-scale)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (-.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))

eval329.0ms (0.5%)

Memory
31.7MiB live, 594.0MiB allocated; 126ms collecting garbage
Compiler

Compiled 313 315 to 7 990 computations (97.4% saved)

prune1.6s (2.3%)

Memory
12.8MiB live, 2 878.4MiB allocated; 330ms collecting garbage
Pruning

16 alts after pruning (16 fresh and 0 done)

PrunedKeptTotal
New89116907
Fresh000
Picked101
Done000
Total89216908
Accuracy
51.2%
Counts
908 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) #s(approx (sin (* (/ angle 180) (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
15.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 #s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
▶8.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64)))
11.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (/.f64 (PI.f64) x-scale) (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) y-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale))))))))))) (PI.f64)))
15.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
14.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 #s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
▶10.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
2.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
20.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
2.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64)))
▶4.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64)))
5.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (PI.f64)))
19.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
▶32.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
8.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
▶16.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
Compiler

Compiled 12 880 to 2 614 computations (79.7% saved)

series3.4s (5%)

Memory
46.5MiB live, 4 700.4MiB allocated; 1.5s collecting garbage
Counts
159 → 1 448
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/.f64 y-scale x-scale)
y-scale
x-scale
(/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(literal 2 binary64)
(*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 a a)
a
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 b b)
b
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))
(-.f64 (*.f64 b b) (*.f64 a a))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
#s(literal 4 binary64)
(*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(*.f64 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))
(*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
#s(literal 1/2 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
(/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))
#s(literal -2 binary64)
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(literal -1/4 binary64)
(*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))
(/.f64 y-scale (*.f64 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))
(-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
(*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale))
(pow.f64 b #s(literal 4 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(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))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
(/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale)
(/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale)
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (* (pow a 2) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) x-scale)) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (* (pow a 2) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) x-scale)) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)) (* (pow a 2) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2)))) x-scale)) (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/2 (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/2 (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* -1/2 (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2))))) (* -1/4 (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* (pow a 2) (- (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2)))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2)))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (* (pow a 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (pow b 4)))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow b 2))) (pow b 4))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow b 2)) (pow a 2))) (pow b 4))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (* (pow a 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/4 (* (pow a 2) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/4 (* (pow a 2) (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (+ (* -1/4 (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (+ (* 1/4 (* (pow a 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (+ (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow a 2) (+ (* 1/4 (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (- (+ (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))))) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (+ (* 2 (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2)))))) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 2)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -2 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 2) x-scale))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) x-scale))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 4) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 2) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) x-scale))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) x-scale))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 4) x-scale))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 6) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 2) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) x-scale))) (+ (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) x-scale))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (pow a 6))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (+ (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI))))))) (pow a 4))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1 (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 6))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow a 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow a 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 4))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow a 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 4))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (+ (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 4)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (pow a 4)))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ 1 (* -2 (/ (pow b 2) (pow a 2)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ 1 (+ (* -2 (/ (pow b 2) (pow a 2))) (/ (pow b 4) (pow a 4)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (+ (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow a 6))) (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 6) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (+ (* -1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow a 6))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4)))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow a 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow a 6))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow a 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 2))) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 4))) (+ (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow a 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow a 6))) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 4))) (+ (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow a 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (pow y-scale 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)) (pow y-scale 2))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 4) (pow y-scale 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (* (pow a 4) (pow y-scale 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2)))) (+ (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2)))) (+ (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow y-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)) (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)) (* (pow b 2) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) x-scale)) (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)) (* (pow b 2) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) x-scale)) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)) (* (pow b 2) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2)))) x-scale)) (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) x-scale))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/2 (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/2 (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/2 (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2))))) (* -1/4 (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2)))) (pow a 2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* 1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (- (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2)))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2)))) (pow a 2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (* (pow b 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (+ (* -2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* -2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow b 2))) (pow a 4))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow a 2)) (pow b 2))) (pow a 4))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (+ (* -1/4 (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/4 (* (pow b 2) (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (* 1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (- (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (- (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (- (+ (* -1/4 (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (+ (* 1/4 (* (pow b 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (+ (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow b 2) (+ (* 1/4 (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (- (+ (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))))) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (+ (* 2 (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2)))))) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2))) (* (pow b 2) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (pow b 4) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 4) (pow x-scale 2))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow b 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow b 4) x-scale))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) x-scale))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (* (pow b 6) x-scale))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow b 4) x-scale))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 6) x-scale))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) x-scale))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 6))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4)))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sin (* 1/180 (* angle (PI)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1 (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow b 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow b 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 4))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow b 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 4))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (+ (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 4)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ 1 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ 1 (+ (* -2 (/ (pow a 2) (pow b 2))) (/ (pow a 4) (pow b 4)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 6))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 6) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 6) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 5))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (+ (* -1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4)))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow b 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow b 6))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 8))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 2))) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 4))) (+ (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow b 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow b 6))) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 4))) (+ (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow b 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (+ (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (pow y-scale 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 3) (pow y-scale 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 3) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (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)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (+ (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 360 (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/48600 (/ (* (pow b 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))) (- (pow b 2) (pow a 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (+ (* 2 (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 2 (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 2 (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (+ (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -90 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (* 1/2 (PI))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (* angle (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (+ (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* angle (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (* angle (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow y-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow y-scale 2))))))))))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))) (* angle (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (* -1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (* angle (- (* angle (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 3) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) x-scale))))) angle)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 3) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) x-scale)) (* angle (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) x-scale)) (* -1/4 (/ (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) x-scale)))))))) angle)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 3) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) x-scale)) (* angle (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) x-scale)) (+ (* -1/4 (/ (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) x-scale)) (* angle (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))) x-scale)) (* -1/4 (/ (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) x-scale))))))))))) angle)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))))) angle)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (+ (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ y-scale (sin (* 1/2 (PI))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* y-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ y-scale (sin (* 1/2 (PI)))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* y-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* y-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ y-scale (sin (* 1/2 (PI)))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* y-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* y-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* y-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* y-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* y-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* y-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ y-scale (sin (* 1/2 (PI)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (+ (* 180 (/ (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* -1/1080 (/ (* (PI) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (+ (* 180 (/ (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* -1/1080 (/ (* (PI) (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (pow b 2) (pow a 2))))))) (* -1/1080 (/ (* (PI) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (+ (* angle (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (+ (* angle (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))) (* -2/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow y-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 1/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow y-scale 2))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (* 1/90 (/ (* (pow a 2) (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))) (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow y-scale 2)) (/ (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))))))) (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* (pow a 2) (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* (pow a 2) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/729000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* angle (+ (* 4 (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))))) (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (* 1/32400 (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (+ (* 1/32400 (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2)))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (* 1/32400 (* (pow (PI) 2) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (- (pow b 2) (pow a 2)) 2)))))))))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)))) (* 1/32400 (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (+ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow angle 2) (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* -1/4 (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (+ (* -1/4 (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (+ (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* angle (+ (* -1/4 (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 180 (/ (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (* 1/180 (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 180 (/ (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (* 1/180 (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 180 (/ (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (* 1/180 (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (+ (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (* angle (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/4 (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* angle (+ (* 1/4 (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (- (+ (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (- (+ (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))) (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 8/45 (/ (* (pow a 4) (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 7)))))) (pow y-scale 4))) (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4))) (* angle (+ (* 8/45 (/ (* (pow a 4) (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 7))))) (pow y-scale 4))) (* angle (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4))) (* angle (+ (* 8/45 (/ (* (pow a 4) (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 7))))) (pow y-scale 4))) (* angle (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))) (* angle (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2)))))))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 1/45 (/ (* (pow a 4) (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 4))) (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 4))))))) (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow y-scale 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 4))) (* angle (+ (* 1/45 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 4))) (* 2 (/ (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow y-scale 4)))))))))) (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (/ (* (pow a 2) (* angle (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* angle (* (PI) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (pow y-scale 2))) (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/180 (/ (* (PI) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* 1/180 (/ (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2)))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/180 (/ (* (PI) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (+ (* 1/180 (/ (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))) (* 1/180 (/ (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (/ (* (pow a 2) (* angle (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/16200 (/ (* (pow a 2) (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2))) (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/16200 (/ (* (pow a 2) (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* 1/180 (/ (* (PI) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/16200 (/ (* (pow a 2) (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (+ (* 1/180 (/ (* (PI) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 1/180 (/ (* (pow a 2) (* (PI) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))) (pow y-scale 2))))))))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* 1/90 (/ (* (pow a 2) (* angle (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2))) (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (/ (* angle (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))) (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* angle (+ (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))) (pow y-scale 2)) (/ (* (pow a 2) (* angle (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))) (pow y-scale 2)))))) (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* angle (- (* angle (- (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* angle (- (* angle (- (+ (* -1 (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 4))) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow y-scale 2))))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (pow x-scale 2) (- (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4)))))))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* angle (* (pow b 4) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (/ (* angle (* (pow b 4) (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow y-scale 2))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4)))))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (- (+ (/ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (/ (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (/ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* 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) #s(hole binary64 (* 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))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole 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)))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* 2 (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/17496000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/90 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/11337408000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/15427944806400000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/11337408000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole 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)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (pow a 2) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale)))))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) y-scale) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) y-scale))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale))))))) (/ (pow a 2) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow a 2)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (+ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 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 a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2)))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow a 2) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow a 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 a))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)))))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) x-scale) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) x-scale))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale))))))) (/ (pow b 2) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow b 2)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* (pow angle 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (pow b 2))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* 1/22674816000000 (* a (* (pow angle 2) (pow (PI) 5))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* a (* (pow angle 2) (pow (PI) 7)))) (* 1/22674816000000 (* a (pow (PI) 5)))))))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow b 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 b))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* -1/64800 (* (pow angle 2) (* b (pow (PI) 2)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* 1/25194240000 (* (pow angle 2) (* b (pow (PI) 4)))))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (* b (pow (PI) 6)))) (* 1/25194240000 (* b (pow (PI) 4))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 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)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-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))))))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/90 (* (pow a 2) (* angle (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -1/90 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* -1/16200 (* (pow a 2) (* angle (* (pow (PI) 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -1/90 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -2 (* (pow a 2) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* -1/16200 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -1/90 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/16200 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (+ (* -2 (* (pow a 2) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/1574640000 (* (pow a 2) (* angle (* (pow (PI) 4) (cos (* 1/2 (PI)))))))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* (pow a 2) (* angle (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/32400 (* (pow a 2) (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))))) (* 1/180 (* (pow a 2) (* (PI) (sin (* 1/2 (PI))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* (pow a 2) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow a 2) (* angle (* (pow (PI) 4) (cos (* 1/2 (PI))))))) (* (pow a 2) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* angle (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* 1/180 (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (cos (* 1/2 (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2)))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))) (pow y-scale 2))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (/ (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (/ y-scale x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (pow x-scale 3))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (pow x-scale 2))))
#s(approx (/ y-scale (* x-scale x-scale)) #s(hole binary64 (/ y-scale (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4)))))) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))) (pow x-scale 4))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow x-scale 2) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (* -1/4 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (pow y-scale 2))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow y-scale 4))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow x-scale 4)))))) (pow y-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow x-scale 4))))) (pow y-scale 4))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* (pow y-scale 3) (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))) (* -1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* (pow y-scale 3) (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (* -1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1 (* (pow y-scale 3) (+ (* 1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1 (* (pow y-scale 3) (+ (* 1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))))))
Calls

15 calls:

TimeVariablePointExpression
411.0ms
angle
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* a a) a (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* b b) b (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* y-scale y-scale) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* (- (* b b) (* a a)) (- (* b b) (* a a))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (pow b 4) (* x-scale x-scale)) (pow b 4) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))
204.0ms
a
@inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* a a) a (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* b b) b (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* y-scale y-scale) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* (- (* b b) (* a a)) (- (* b b) (* a a))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (pow b 4) (* x-scale x-scale)) (pow b 4) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))
190.0ms
b
@inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* a a) a (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* b b) b (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* y-scale y-scale) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* (- (* b b) (* a a)) (- (* b b) (* a a))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (pow b 4) (* x-scale x-scale)) (pow b 4) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))
174.0ms
x-scale
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* a a) a (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* b b) b (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* y-scale y-scale) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* (- (* b b) (* a a)) (- (* b b) (* a a))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (pow b 4) (* x-scale x-scale)) (pow b 4) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))
168.0ms
a
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* a a) a (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* b b) b (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* y-scale y-scale) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* (- (* b b) (* a a)) (- (* b b) (* a a))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (pow b 4) (* x-scale x-scale)) (pow b 4) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))

rewrite2.6s (3.8%)

Memory
189.0MiB live, 4 559.3MiB allocated; 776ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
09652809562
010009809562
010009787448
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
1 607 → 1 616
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/.f64 y-scale x-scale)
y-scale
x-scale
(/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(literal 2 binary64)
(*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 a a)
a
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 b b)
b
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))
(-.f64 (*.f64 b b) (*.f64 a a))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
#s(literal 4 binary64)
(*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(*.f64 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))
(*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
#s(literal 1/2 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
(/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))
#s(literal -2 binary64)
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(literal -1/4 binary64)
(*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))
(/.f64 y-scale (*.f64 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))
(-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
(*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale))
(pow.f64 b #s(literal 4 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(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))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
(/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale)
(/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale)
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (* (pow a 2) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) x-scale)) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)) (* (pow a 2) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) x-scale)) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)) (* (pow a 2) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2)))) x-scale)) (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/2 (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/2 (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* -1/2 (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2))))) (* -1/4 (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))))) (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (+ (* -1/2 (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/2 (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2)))))) (* -1/2 (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (* -1/2 (/ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 2))))) (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* (pow a 2) (- (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2)))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1 (/ (- (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (pow b 2)))))) (* -1 (/ (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow b 2)))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (* (pow a 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (pow b 4)))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow b 2))) (pow b 4))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow a 2) (+ (* -2 (pow b 2)) (pow a 2))) (pow b 4))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (* (pow a 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/4 (* (pow a 2) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/4 (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 2) (+ (* -1/4 (* (pow a 2) (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1/4 (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* -1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (+ (* -1/4 (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (+ (* 1/4 (* (pow a 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (+ (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow a 2) (+ (* 1/4 (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (- (+ (* (pow a 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))))) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 2) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (+ (* 2 (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2)))))) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 2)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow a 2) (+ (* -1 (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -2 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 2) x-scale))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) x-scale))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 4) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 2) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) x-scale))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) x-scale))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow a 4) x-scale))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 6) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 2) x-scale))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) x-scale))) (+ (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) x-scale))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (pow a 6))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (+ (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow a 6))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* -1 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (pow a 6))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow a 6))) (/ (* (pow b 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI))))))) (pow a 4))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (+ (* -1 (/ (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI))))))) (pow a 4))) (+ (* -1 (/ (* (pow b 2) (- (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1 (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 6))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow a 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow a 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 4))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow a 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 4))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 2) (pow y-scale 2))) (+ (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 4)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (pow a 4)))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ 1 (* -2 (/ (pow b 2) (pow a 2)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ 1 (+ (* -2 (/ (pow b 2) (pow a 2))) (/ (pow b 4) (pow a 4)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 2))) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow a 4))) (+ (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow a 6))) (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 6) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (+ (* -1 (/ (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow a 4) (- (+ (* -1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow a 6))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4)))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow a 2))) (+ (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow a 4)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow a 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow a 6))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow a 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (pow a 4)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow a 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow a 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow b 4) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* 2 (/ (* (pow b 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 2))) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 4))) (+ (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow a 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow a 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow a 6))) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow a 4))) (+ (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow a 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow y-scale 4)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (pow y-scale 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)) (pow y-scale 2))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 4) (pow y-scale 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 3)) (* (pow a 4) (pow y-scale 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2)))) (+ (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 4) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2)))) (+ (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 4) (pow y-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 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 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)) (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)) (* (pow b 2) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) x-scale)) (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)) (* (pow b 2) (+ (* -1/2 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) x-scale)) (+ (* -1/4 (/ (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) x-scale)) (* (pow b 2) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2)))) x-scale)) (* -1/4 (/ (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) x-scale))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/2 (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/2 (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/2 (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2))))) (* -1/4 (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/2 (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/2 (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2)))))) (* -1/2 (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (+ (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (+ (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) (- (* 1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1 (/ (- (* -1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2)))) (pow a 2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* 1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (- (* -1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2)))) (pow a 2)))) (pow a 2)))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2)))) (pow a 2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (sin (* 1/180 (* angle (PI)))) (pow a 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (* (pow b 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (+ (* -2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (+ (* -2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow b 2))) (pow a 4))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (+ (* (pow b 2) (+ (* -2 (pow a 2)) (pow b 2))) (pow a 4))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (+ (* -1/4 (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (+ (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow b 2) (+ (* -1/4 (* (pow b 2) (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* -1/4 (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (* (pow b 2) (- (* 1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 3) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (* -1 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (+ (* -1 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* (pow b 2) (- (* 1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (+ (* -1 (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* -1 (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow a 8) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (- (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (- (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (- (+ (* -1/4 (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (+ (* 1/4 (* (pow b 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (+ (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow b 2) (+ (* 1/4 (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (pow b 2) (- (+ (* (pow b 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* 2 (/ (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))) (* (pow a 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))))) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))))) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 2) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (+ (* 2 (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2)))))) (pow (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 4))) (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))) (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (pow y-scale 2))) (* (pow b 2) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 3)) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (pow b 4) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 4) (pow x-scale 2))))
#s(approx (pow b 4) #s(hole binary64 (pow b 4)))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow b 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow b 4) x-scale))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) x-scale))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (* (pow b 6) x-scale))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow b 4) x-scale))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 6) x-scale))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 2) x-scale))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) x-scale))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (+ (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 6))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (- (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* -1 (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))) (pow b 6))) (+ (* -1/2 (/ (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (pow b 4))) (* -1/2 (/ (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4)))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (* y-scale (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -1 (/ (* (pow a 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (sin (* 1/180 (* angle (PI)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1 (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 6))) (* -1 (/ (* (pow a 2) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow b 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow b 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 4))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow b 2))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 4))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 2) (pow y-scale 2))) (+ (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 4)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 4)) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ 1 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ 1 (+ (* -2 (/ (pow a 2) (pow b 2))) (/ (pow a 4) (pow b 4)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (- (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 6))) (+ (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow b 2))) (* -1/4 (/ (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow b 4))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow y-scale 3) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 6) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow y-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5))))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 3) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 3) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 3) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 6) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 5)))) (+ (* -1 (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -1 (/ (* (pow a 4) (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 5))) (/ (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (/ (* (pow y-scale 2) (- (* 2 (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* (pow b 4) (- (+ (* -1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow b 6))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4)))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 2))) (+ (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow b 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow b 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (+ (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow b 6))) (+ (* 1/4 (/ (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (pow b 2))) (* 1/4 (/ (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (pow b 4)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* (pow b 4) (- (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow y-scale 4) (+ (* 2 (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow a 4) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 8))) (/ (* (pow a 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (- (* 2 (/ (* (pow y-scale 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 2 (/ (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 2))) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 4))) (+ (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow b 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 8) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (pow b 6))) (+ (* 2 (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 2))) (+ (* 2 (/ (* (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow b 4))) (+ (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) 2) (pow b 4)) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow y-scale 4)))) (+ (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 4) (pow y-scale 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (pow y-scale 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 3) (pow y-scale 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 3) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 4) (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow a 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (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)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 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 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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 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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (+ (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 360 (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/48600 (/ (* (pow b 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))) (- (pow b 2) (pow a 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (+ (* 2 (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 2 (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 2 (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (+ (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -90 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (* 1/2 (PI))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (* angle (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (+ (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* angle (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (* angle (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow y-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow y-scale 2))))))))))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow y-scale 4))) (* angle (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 4))) (* angle (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (* -1/90 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (* angle (- (* angle (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 3) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) x-scale))))) angle)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 3) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) x-scale)) (* angle (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) x-scale)) (* -1/4 (/ (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) x-scale)))))))) angle)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 3) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) x-scale)) (* angle (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) x-scale)) (+ (* -1/4 (/ (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) x-scale)) (* angle (+ (* -1/2 (/ (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))) x-scale)) (* -1/4 (/ (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) x-scale))))))))))) angle)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))))) angle)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (+ (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -90 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 180 (/ (* y-scale (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/97200 (/ (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* y-scale (* (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (/ (* y-scale (* (cos (* 1/2 (PI))) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ y-scale (sin (* 1/2 (PI))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* y-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ y-scale (sin (* 1/2 (PI)))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* y-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* y-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ y-scale (sin (* 1/2 (PI)))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* y-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* y-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* y-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* y-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* y-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* y-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ y-scale (sin (* 1/2 (PI)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (+ (* 180 (/ (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* -1/1080 (/ (* (PI) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (+ (* 180 (/ (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* -1/1080 (/ (* (PI) (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (pow b 2) (pow a 2))))))) (* -1/1080 (/ (* (PI) (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* -1 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (+ (* angle (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (+ (* angle (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow a 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))) (* -2/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow y-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2)))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 1/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow y-scale 2))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 2))) (* angle (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (* 1/90 (/ (* (pow a 2) (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))) (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow y-scale 2)) (/ (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))))))) (/ (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* (pow a 2) (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* (pow a 2) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/729000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* angle (+ (* 4 (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))))) (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (* 1/32400 (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2)))) (+ (* 1/32400 (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2)))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2))))) (* 1/32400 (* (pow (PI) 2) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (- (pow b 2) (pow a 2)) 2)))))))))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)))) (* 1/32400 (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow angle 2) (+ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow angle 2) (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* -1/4 (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (+ (* -1/4 (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (+ (* -45 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (+ (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* angle (+ (* -1/4 (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 180 (/ (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (* 1/180 (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))) (* -1/4 (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 3) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* angle (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 180 (/ (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (* 1/180 (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))) (+ (* 32400 (/ (* (pow y-scale 3) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 3) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 3) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow x-scale 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 180 (/ (* (pow y-scale 2) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (+ (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* angle (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 180 (/ (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (* 1/180 (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))))))) (+ (* 32400 (/ (* (pow y-scale 2) (* (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))) (/ (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 180 (/ (* (pow y-scale 2) (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))) (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))))))) (* 180 (/ (* (pow y-scale 2) (* (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))) (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))) (* (pow a 4) (* (PI) (* (pow (sin (* 1/2 (PI))) 6) (pow (- (pow b 2) (pow a 2)) 2)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (- (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (+ (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* angle (- (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2))) (+ (/ (* (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))))))))) (pow y-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))))) (pow y-scale 2))) (pow (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (+ (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/12597120000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/4199040000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)))))))))) (pow (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) 2)))) (pow a 4))) (+ (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (/ (* (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* 1/8100 (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/4 (* angle (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/4 (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/4 (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* angle (+ (* 1/4 (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* 1/4 (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4)))))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (- (+ (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 4 (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))) (* angle (- (+ (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (- (+ (* angle (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (sin (* 1/2 (PI))))) (+ (* 4 (/ (* (pow b 4) (+ (* 1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (* 2 (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow a 4))) (/ (* (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4))))))) (/ (* (pow y-scale 4) (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))) (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 8/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))))) (sin (* 1/2 (PI))))) (* 4 (/ (* (pow b 4) (+ (* 1/8100 (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (* 2 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))) (pow a 4))))))) (* 4/45 (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 8/45 (/ (* (pow a 4) (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 7)))))) (pow y-scale 4))) (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4))) (* angle (+ (* 8/45 (/ (* (pow a 4) (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 7))))) (pow y-scale 4))) (* angle (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (pow (sin (* 1/2 (PI))) 8))) (pow y-scale 4))) (* angle (+ (* 8/45 (/ (* (pow a 4) (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 7))))) (pow y-scale 4))) (* angle (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4/2025 (/ (* (pow a 4) (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 6))))) (pow y-scale 4))) (* angle (+ (* -4 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -2 (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 2))) (* 2 (/ (* (pow a 2) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (pow y-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow y-scale 2))))))) (pow y-scale 2))) (* -4/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (+ (* 1/8100 (/ (* (pow a 2) (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))) (+ (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))))) (pow y-scale 2)))))))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 1/45 (/ (* (pow a 4) (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow y-scale 4))) (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow y-scale 4))) (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 4))))))) (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow y-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow a 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow y-scale 4))) (+ (* 2 (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (pow y-scale 4))) (* angle (+ (* 1/45 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (pow y-scale 4))) (* 2 (/ (* (pow a 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow y-scale 4)))))))))) (/ (* (pow a 4) (pow (sin (* 1/2 (PI))) 4)) (pow y-scale 4)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (/ (* (pow a 2) (* angle (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (pow y-scale 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* angle (* (PI) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))))))) (pow y-scale 2))) (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/180 (/ (* (PI) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* 1/180 (/ (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2)))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/180 (/ (* (PI) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (+ (* 1/180 (/ (* (PI) (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 3) (- (pow b 2) (pow a 2)))))) (+ (* 1/16200 (* (pow a 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (sin (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow (PI) 3) (+ (* 1/180 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))) (* 1/180 (/ (* (PI) (+ (* -1/5832000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* -1/34992000 (* (pow a 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))))) (* (pow a 2) (* (sin (* 1/2 (PI))) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))))))) (pow y-scale 2))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (/ (* (pow a 2) (* angle (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))))) (pow y-scale 2)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/16200 (/ (* (pow a 2) (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2))) (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/16200 (/ (* (pow a 2) (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* 1/180 (/ (* (PI) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (/ (* (pow a 2) (* (PI) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (* angle (+ (* 1/16200 (/ (* (pow a 2) (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* angle (+ (* -1/34992000 (/ (* (pow a 2) (* (pow (PI) 3) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2))))) (pow y-scale 2))) (+ (* 1/180 (/ (* (PI) (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 1/180 (/ (* (pow a 2) (* (PI) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))) (pow y-scale 2))))))))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* 1/90 (/ (* (pow a 2) (* angle (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (pow y-scale 2))) (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (/ (* angle (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))) (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* angle (+ (/ (* (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow a 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (- (pow b 2) (pow a 2))) (pow y-scale 2)) (/ (* (pow a 2) (* angle (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (- (pow b 2) (pow a 2))))) (pow y-scale 2)))))) (/ (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (- (pow b 2) (pow a 2)))) (pow y-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* angle (- (* angle (- (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* angle (- (* angle (- (+ (* -1 (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 4))) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow y-scale 2))))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* angle (+ (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (pow x-scale 2) (- (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2)))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4)))))))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* angle (* (pow b 4) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 4) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (/ (* angle (* (pow b 4) (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 4) (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow y-scale 2))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 4))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 4) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow b 4) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 4) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 4)))))))))) (/ (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (- (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (- (+ (/ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (/ (* angle (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (/ (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* 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) #s(hole binary64 (* 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))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole 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)))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale)) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) x-scale))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) x-scale)))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* 2 (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/90 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/17496000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/90 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/11337408000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/90 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/17496000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/15427944806400000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/11337408000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* (/ angle 180) (PI)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 1))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole 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)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (pow a 2) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale)))))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) y-scale) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) y-scale))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale))))))) (/ (pow a 2) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow a 2)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow a 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (+ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 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 a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow a 2)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2)))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow a 2) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow a 2))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow a 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 a))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* -1/64800 (* a (* (pow angle 2) (pow (PI) 2)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* 1/25194240000 (* a (* (pow angle 2) (pow (PI) 4)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ a (* (pow angle 2) (+ (* -1/64800 (* a (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* a (* (pow angle 2) (pow (PI) 6)))) (* 1/25194240000 (* a (pow (PI) 4))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (pow (PI) 4)))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* angle (* b (PI))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (pow (PI) 3)))) (* 1/180 (* b (PI)))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* 1/22674816000000 (* (pow angle 2) (* b (pow (PI) 5))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* b (PI))) (* (pow angle 2) (+ (* -1/34992000 (* b (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (pow (PI) 7)))) (* 1/22674816000000 (* b (pow (PI) 5)))))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (pow b 2) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)))))) (/ (pow b 2) x-scale))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) x-scale) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) x-scale))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale))))))) (/ (pow b 2) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (pow b 2)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (pow b 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* (pow angle 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))) (pow b 2))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* 1/22674816000000 (* a (* (pow angle 2) (pow (PI) 5))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (* a (PI))) (* (pow angle 2) (+ (* -1/34992000 (* a (pow (PI) 3))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* a (* (pow angle 2) (pow (PI) 7)))) (* 1/22674816000000 (* a (pow (PI) 5)))))))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (pow b 2)))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* -1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow b 2))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (pow b 2))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 b))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* -1/64800 (* (pow angle 2) (* b (pow (PI) 2)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* 1/25194240000 (* (pow angle 2) (* b (pow (PI) 4)))))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ b (* (pow angle 2) (+ (* -1/64800 (* b (pow (PI) 2))) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (* b (pow (PI) 6)))) (* 1/25194240000 (* b (pow (PI) 4))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 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)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-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))))))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/90 (* (pow a 2) (* angle (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -1/90 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* -1/16200 (* (pow a 2) (* angle (* (pow (PI) 2) (cos (* 1/2 (PI)))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -1/90 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -2 (* (pow a 2) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* -1/16200 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -1/90 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/16200 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (+ (* -2 (* (pow a 2) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/1574640000 (* (pow a 2) (* angle (* (pow (PI) 4) (cos (* 1/2 (PI)))))))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/180 (* (pow a 2) (* angle (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/32400 (* (pow a 2) (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))))) (* 1/180 (* (pow a 2) (* (PI) (sin (* 1/2 (PI))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* (pow a 2) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (* (pow a 2) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow a 2) (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow a 2) (* angle (* (pow (PI) 4) (cos (* 1/2 (PI))))))) (* (pow a 2) (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* angle (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* 1/180 (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (cos (* 1/2 (PI))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (cos (* 1/2 (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2)))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) #s(hole binary64 (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2)))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))) (pow y-scale 2))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))) (pow y-scale 2))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) #s(hole binary64 (/ (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))) (pow y-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole 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)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole 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))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (/ y-scale x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4)))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (pow x-scale 3))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (pow x-scale 2))))
#s(approx (/ y-scale (* x-scale x-scale)) #s(hole binary64 (/ y-scale (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))))) (pow x-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4)))))) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow x-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))) (pow x-scale 4))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow x-scale 2) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2)) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 4))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (* -1/4 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (pow y-scale 2))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* (pow y-scale 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) #s(hole binary64 (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) #s(hole binary64 (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow y-scale 4))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (- (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow x-scale 4)))))) (pow y-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow y-scale 4))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (/ (* (pow b 4) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow x-scale 4))))) (pow y-scale 4))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* (pow y-scale 3) (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))) (* -1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1/4 (/ (* (pow y-scale 3) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* (pow y-scale 3) (+ (* -1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (* -1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (pow b 6) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow b 2) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 4)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) #s(hole binary64 (* -1 (* (pow y-scale 3) (+ (* 1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 3) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* x-scale (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) #s(hole binary64 (* -1 (* (pow y-scale 3) (+ (* 1/4 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) 2) (pow (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))))))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/.f64 y-scale x-scale)
y-scale
x-scale
(/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(literal 2 binary64)
(*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 a a)
a
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 b b)
b
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))
(-.f64 (*.f64 b b) (*.f64 a a))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
#s(literal 4 binary64)
(*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(*.f64 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))
(*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
#s(literal 1/2 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
(/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))
(+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))
#s(literal -2 binary64)
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(+.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(literal -1/4 binary64)
(*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))
(/.f64 y-scale (*.f64 x-scale x-scale))
(/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))
(-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))
#s(literal 1/4 binary64)
(/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
(*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale))
(pow.f64 b #s(literal 4 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(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))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
(/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale)
(/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale)
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* a a) (pow.f64 a #s(literal 2 binary64)))
#s(approx a a)
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (- (* b b) (* a a)) (pow.f64 b #s(literal 2 binary64)))
#s(approx (- (* b b) (* a a)) (fma.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale)))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 b #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (pow.f64 b #s(literal 4 binary64)))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #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))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 #s(literal 2 binary64) (*.f64 (pow.f64 b #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)))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (fma.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (pow.f64 b #s(literal 2 binary64)))))
#s(approx (- (pow b 2) (pow a 2)) (pow.f64 b #s(literal 2 binary64)))
#s(approx (- (pow b 2) (pow a 2)) (fma.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow a 2) (pow.f64 a #s(literal 2 binary64)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (*.f64 a (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (- (* b b) (* a a)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (- (* b b) (* a a)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) x-scale)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 a #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (pow.f64 a #s(literal 4 binary64)))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 a #s(literal 4 binary64)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 a #s(literal 4 binary64)))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 a #s(literal 4 binary64)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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 (pow.f64 a #s(literal 2 binary64)) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #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))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.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))))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 #s(literal -1 binary64) (pow.f64 a #s(literal 2 binary64))))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* b b) (pow.f64 b #s(literal 2 binary64)))
#s(approx b b)
#s(approx (- (* b b) (* a a)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) x-scale)))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) x-scale))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) x-scale)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 5 binary64)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (fma.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (pow b 4) (* x-scale x-scale)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow b 4) (pow.f64 b #s(literal 4 binary64)))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (pow b 2) (pow a 2)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow b 2) (pow.f64 b #s(literal 2 binary64)))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (- (* b b) (* a a)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale)))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) x-scale)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale)))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (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))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (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))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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 (*.f64 (pow.f64 a #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 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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 (*.f64 (pow.f64 a #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 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #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 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* (- (* b b) (* a a)) (- (* b b) (* a a))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (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)))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (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))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 b #s(literal 4 binary64))))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (pow.f64 b #s(literal 4 binary64)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (pow.f64 b #s(literal 2 binary64)) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (pow.f64 b #s(literal 2 binary64))) (*.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)))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 b #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (- (pow b 2) (pow a 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -180 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/48600 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/48600 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/48600 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/45 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* 1/180 (* angle (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx angle angle)
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (fma.f64 #s(literal 1/45 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))
#s(approx (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/11664000 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (pow.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (PI.f64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (PI.f64)) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (PI.f64))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (PI.f64))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (PI.f64)) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (PI.f64))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (-.f64 (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (-.f64 (*.f64 angle (-.f64 (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) x-scale))))) angle))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) x-scale) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) x-scale)))))))) angle))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) x-scale) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) x-scale) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale))))))))))) angle))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) angle))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))))) angle))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))) angle))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 y-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/11664000 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 y-scale (pow.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 y-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) angle))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) angle))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) angle))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 angle (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 4 binary64) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2916000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (*.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (fma.f64 #s(literal -1/4 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (fma.f64 #s(literal -45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (fma.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 angle (fma.f64 #s(literal -1/4 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12597120000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4199040000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (pow.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/45 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 angle (fma.f64 #s(literal 1/4 binary64) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (fma.f64 angle (fma.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 angle (fma.f64 #s(literal 1/4 binary64) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))) (pow.f64 a #s(literal 4 binary64)))))))) (*.f64 #s(literal 4/45 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 7 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 7 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))))))))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 7 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4/2025 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -4/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64)))))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 angle (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (*.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (*.f64 angle (-.f64 (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (+.f64 (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2916000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (+.f64 (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (+.f64 (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 x-scale y-scale))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))))))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) x-scale)))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (fma.f64 #s(literal -1/1469328076800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (fma.f64 #s(literal -1/4407984230400000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (fma.f64 #s(literal 1/4534963200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale) (*.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) x-scale))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/15427944806400000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 1/11337408000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* (/ angle 180) (PI))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* (/ angle 180) (PI)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle))
#s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) y-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) y-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) y-scale)))))) (/.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow.f64 a #s(literal 2 binary64)))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow.f64 a #s(literal 2 binary64)))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) a)
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 #s(literal -1/64800 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) (+.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (pow (* b (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (PI.f64)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) x-scale)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) x-scale)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) x-scale)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow.f64 b #s(literal 2 binary64)))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (*.f64 angle (PI.f64)))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 a (PI.f64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 a (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 a (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow.f64 b #s(literal 2 binary64)))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (* b (cos (* (/ angle 180) (PI)))) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) b)
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* b (cos (* (/ angle 180) (PI)))) (+.f64 b (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 b (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) 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 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 (pow.f64 angle #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -2 (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -1/90 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/1574640000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 x-scale y-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) x-scale)))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (sin (* (/ angle 180) (PI))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (cos (* (/ angle 180) (PI))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) y-scale))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (* 1/180 (* angle (PI))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))) x-scale))
#s(approx (/ y-scale x-scale) (/.f64 y-scale x-scale))
#s(approx x-scale x-scale)
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 x-scale #s(literal 2 binary64))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* x-scale x-scale) (pow.f64 x-scale #s(literal 2 binary64)))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 3 binary64))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ y-scale (* x-scale x-scale)) (/.f64 y-scale (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))) x-scale))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale #s(literal 2 binary64)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale)))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))))
#s(approx y-scale y-scale)
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* y-scale y-scale) (pow.f64 y-scale #s(literal 2 binary64)))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (/.f64 (fma.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 4 binary64)))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (/.f64 (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (pow (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (* 4 (* (/ (pow b 4) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))
#s(approx (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))
#s(approx (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 7 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))))
#s(approx (/ (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) x-scale) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 3 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/2 (* (/ y-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* -1/4 (* (/ y-scale (* x-scale x-scale)) (/ (- (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale)))) (+ (* -2 (* (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* y-scale y-scale))))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (* (/ (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* y-scale y-scale)) (- (* b b) (* a a))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 3 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))))))))))

eval3.4s (5%)

Memory
58.9MiB live, 6 588.6MiB allocated; 1.7s collecting garbage
Compiler

Compiled 4 146 622 to 49 487 computations (98.8% saved)

prune16.0s (23.2%)

Memory
211.5MiB live, 29 632.9MiB allocated; 5.0s collecting garbage
Pruning

20 alts after pruning (20 fresh and 0 done)

PrunedKeptTotal
New5 387195 406
Fresh10111
Picked505
Done000
Total5 402205 422
Accuracy
77.5%
Counts
5 422 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
28.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
30.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
29.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
32.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
8.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
30.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
▶21.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
30.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle)))))) (PI.f64)))
41.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
▶44.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
13.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
▶25.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
32.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 #s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
8.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))))) (PI.f64)))
16.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
▶9.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
40.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
42.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
19.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
▶6.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
Compiler

Compiled 14 658 to 3 850 computations (73.7% saved)

series1.1s (1.5%)

Memory
7.2MiB live, 1 997.8MiB allocated; 175ms collecting garbage
Counts
131 → 549
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 y-scale x-scale)
y-scale
x-scale
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(literal -2 binary64)
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))
(*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
(*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))
(-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
(fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(literal -1/32400 binary64)
(/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
(pow.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(pow.f64 y-scale #s(literal 2 binary64))
(*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(literal 1/32400 binary64)
(/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
(/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(pow.f64 x-scale #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
(-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
(*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(literal 1/8100 binary64)
(/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
(/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
(*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(literal -1 binary64)
(*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))
(/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))
(/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
(fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(literal 4 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))
#s(literal 3 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
(*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 a #s(literal 2 binary64))
a
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))
(-.f64 (*.f64 b b) (*.f64 a a))
(*.f64 b b)
b
(*.f64 a a)
Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow b 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (+ (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 360 (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/48600 (/ (* (pow b 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))) (- (pow b 2) (pow a 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1/90 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* 1/16200 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* -2 (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* -2 (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 2 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI)))))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/180 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* -1/32400 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -90 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (* 1/2 (PI))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (* angle (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (+ (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle y-scale))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* y-scale (PI)))) (* angle (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* y-scale (pow (PI) 3))))) angle)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* y-scale (PI)))) (* angle (+ (* -1 (* angle (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2))))))) (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* y-scale (pow (PI) 3))))) angle)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* y-scale (PI)))) (* angle (+ (* angle (+ (* -1 (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2)))))) (* angle (* y-scale (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))))) (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* y-scale (pow (PI) 3))))) angle)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle y-scale)))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (* angle (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))))) (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) y-scale))) angle)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) y-scale)) (* angle (+ (* -1 (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* angle (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2))))))))) angle)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) y-scale)) (* angle (+ (* -1 (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* angle (+ (* -1 (* angle (* y-scale (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))))) (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2)))))))))) angle)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle (pow y-scale 2))))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (* angle (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (pow y-scale 2)))) angle)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (pow y-scale 2))) (* angle (+ (* -1 (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))) (* angle (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2)))))))) angle)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (pow y-scale 2))) (* angle (+ (* -1 (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))) (* angle (+ (* -1 (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2))))))))) angle)))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle (pow y-scale 2)))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* (pow y-scale 2) (PI)))) (* angle (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))) angle)))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* (pow y-scale 2) (PI)))) (* angle (- (+ (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* angle (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))) angle)))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* (pow y-scale 2) (PI)))) (* angle (- (+ (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* angle (- (+ (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (- (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (- (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (+ (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (- (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (+ (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (PI))) (+ (* -1/97200 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6))))))))) (+ (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* angle (PI))))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 2 (* angle (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI)))) angle)))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2)))))))) angle)))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (+ (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (PI))) (* -1/97200 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2)))))))) angle)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* angle (pow (PI) 3))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (/ (+ (* 2916000 (/ (* angle (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))) (pow (PI) 3))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (/ (+ (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 1/2 (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) angle)))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (/ (+ (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 1/2 (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))))))) angle)))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* angle (pow (PI) 3))))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* 5832000 (/ (* angle (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))) (pow (PI) 3))) (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3))) (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))))) angle)))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3))) (* angle (- (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))))) angle)))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* angle (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/729000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 4 (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* 1/5832000 (* (pow angle 3) (pow (PI) 3)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/566870400000 (pow (PI) 5)) (+ (* -1/1133740800000 (pow (PI) 5)) (* (pow angle 2) (+ (* 1/734664038400000000 (pow (PI) 7)) (+ (* 1/110199605760000000 (pow (PI) 7)) (* 1/180 (* (PI) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/566870400000 (pow (PI) 5)) (+ (* -1/1133740800000 (pow (PI) 5)) (* (pow angle 2) (+ (* 1/734664038400000000 (pow (PI) 7)) (+ (* 1/110199605760000000 (pow (PI) 7)) (+ (* 1/180 (* (PI) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/71409344532480000000000 (pow (PI) 9)) (+ (* -1/999730823454720000000000 (pow (PI) 9)) (* 1/180 (* (PI) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* 1/90 (/ (* angle (PI)) (pow x-scale 2)))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* angle (+ (* -1/17496000 (/ (* (pow angle 2) (pow (PI) 3)) (pow x-scale 2))) (* 1/90 (/ (PI) (pow x-scale 2)))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* angle (+ (* 1/90 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/17496000 (/ (pow (PI) 3) (pow x-scale 2))) (* 1/11337408000000 (/ (* (pow angle 2) (pow (PI) 5)) (pow x-scale 2)))))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* angle (+ (* 1/90 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/17496000 (/ (pow (PI) 3) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/15427944806400000000 (/ (* (pow angle 2) (pow (PI) 7)) (pow x-scale 2))) (* 1/11337408000000 (/ (pow (PI) 5) (pow x-scale 2)))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* 1/180 (/ (* angle (PI)) (pow x-scale 2)))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* angle (+ (* -1/34992000 (/ (* (pow angle 2) (pow (PI) 3)) (pow x-scale 2))) (* 1/180 (/ (PI) (pow x-scale 2)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) (pow x-scale 2))) (* 1/22674816000000 (/ (* (pow angle 2) (pow (PI) 5)) (pow x-scale 2)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/30855889612800000000 (/ (* (pow angle 2) (pow (PI) 7)) (pow x-scale 2))) (* 1/22674816000000 (/ (pow (PI) 5) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* -1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1 (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))))) (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1 (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))) (* -1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (/ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (+ (* 2 (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 1/16200 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (+ (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 3)))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (/ y-scale x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) x-scale))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))) x-scale))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))) (pow x-scale 2)))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) #s(hole binary64 (* -1 (/ (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 2)))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 2))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* 1/32400 (pow (PI) 2)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (pow (PI) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (PI) 2) (pow x-scale 2))))
#s(approx (pow x-scale 2) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (+ (* 2 (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 2))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/32400 (pow (PI) 2))) (pow x-scale 2))))
#s(approx (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) #s(hole binary64 (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
#s(approx (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow x-scale 2) (pow y-scale 2)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 3))))))) (pow x-scale 2))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) y-scale)) (* 2 (* y-scale (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (pow y-scale 2))) (* 2 (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale)))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (* 2 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (+ (* 2 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow x-scale 2)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (* -1 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* y-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 3)))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2))))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* -1 (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) #s(hole binary64 (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))))))
#s(approx (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) #s(hole binary64 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (pow y-scale 2) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) #s(hole binary64 (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) #s(hole binary64 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow y-scale 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (* (pow y-scale 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (* 2 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (+ (* 2 (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 4)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 4)))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (/ (+ (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* 1/32400 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* 1/32400 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2)))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (/ (- (* 1/32400 (/ (* (pow y-scale 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* -2 (/ (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 2 (/ (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))) y-scale)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 2 (/ (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* -1 (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) #s(hole binary64 (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* 2 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2)))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
Calls

15 calls:

TimeVariablePointExpression
177.0ms
angle
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) 2 (pow (sin (* 1/2 (PI))) 2) (sin (* 1/2 (PI))) (pow y-scale 2) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (cos (* 1/2 (PI))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/ (pow (PI) 2) (pow x-scale 2)) (pow x-scale 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)) (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (* 1/180 (* angle (PI)))) 3) 3 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) b (* a a))
116.0ms
y-scale
@-inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) 2 (pow (sin (* 1/2 (PI))) 2) (sin (* 1/2 (PI))) (pow y-scale 2) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (cos (* 1/2 (PI))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/ (pow (PI) 2) (pow x-scale 2)) (pow x-scale 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)) (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (* 1/180 (* angle (PI)))) 3) 3 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) b (* a a))
98.0ms
y-scale
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) 2 (pow (sin (* 1/2 (PI))) 2) (sin (* 1/2 (PI))) (pow y-scale 2) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (cos (* 1/2 (PI))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/ (pow (PI) 2) (pow x-scale 2)) (pow x-scale 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)) (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (* 1/180 (* angle (PI)))) 3) 3 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) b (* a a))
56.0ms
x-scale
@inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) 2 (pow (sin (* 1/2 (PI))) 2) (sin (* 1/2 (PI))) (pow y-scale 2) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (cos (* 1/2 (PI))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/ (pow (PI) 2) (pow x-scale 2)) (pow x-scale 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)) (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (* 1/180 (* angle (PI)))) 3) 3 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) b (* a a))
51.0ms
angle
@-inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) 2 (pow (sin (* 1/2 (PI))) 2) (sin (* 1/2 (PI))) (pow y-scale 2) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (cos (* 1/2 (PI))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/ (pow (PI) 2) (pow x-scale 2)) (pow x-scale 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (* (pow x-scale 2) (pow y-scale 2)) (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (* 1/180 (* angle (PI)))) 3) 3 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) b (* a a))

rewrite1.1s (1.6%)

Memory
32.7MiB live, 1 923.3MiB allocated; 233ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04071187596
04319163494
012676160653
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
680 → 778
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 y-scale x-scale)
y-scale
x-scale
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(literal -2 binary64)
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))
(*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
(*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))
(-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))
(fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(literal -1/32400 binary64)
(/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
(pow.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(pow.f64 y-scale #s(literal 2 binary64))
(*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(literal 1/32400 binary64)
(/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
(/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(pow.f64 x-scale #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))
(-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))
(*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(literal 1/8100 binary64)
(/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))
(*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
(/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))))
(*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(literal -1 binary64)
(*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))
(/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))
(/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))
(*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))
(fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(literal 4 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))
#s(literal 3 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
(*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 a #s(literal 2 binary64))
a
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))
(-.f64 (*.f64 b b) (*.f64 a a))
(*.f64 b b)
b
(*.f64 a a)
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* b b) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow b 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (+ (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 360 (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/48600 (/ (* (pow b 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))) (- (pow b 2) (pow a 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1/90 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* 1/16200 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* -2 (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* -2 (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 2 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI)))))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/180 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* -1/32400 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -90 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (* 1/2 (PI))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (* angle (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (+ (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle y-scale))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* y-scale (PI)))) (* angle (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* y-scale (pow (PI) 3))))) angle)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* y-scale (PI)))) (* angle (+ (* -1 (* angle (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2))))))) (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* y-scale (pow (PI) 3))))) angle)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* y-scale (PI)))) (* angle (+ (* angle (+ (* -1 (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2)))))) (* angle (* y-scale (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))))) (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* y-scale (pow (PI) 3))))) angle)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle y-scale)))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (* angle (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))))) (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) y-scale))) angle)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) y-scale)) (* angle (+ (* -1 (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* angle (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2))))))))) angle)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) y-scale)) (* angle (+ (* -1 (* y-scale (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* angle (+ (* -1 (* angle (* y-scale (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))))) (* y-scale (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2)))))))))) angle)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle (pow y-scale 2))))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (* angle (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (pow y-scale 2)))) angle)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (pow y-scale 2))) (* angle (+ (* -1 (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))) (* angle (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2)))))))) angle)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (pow y-scale 2))) (* angle (+ (* -1 (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3)))))) (* angle (+ (* -1 (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (+ (* -1 (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/90 (/ (PI) (pow x-scale 2))))))))) angle)))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) (* angle (pow y-scale 2)))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* (pow y-scale 2) (PI)))) (* angle (- (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))) angle)))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* (pow y-scale 2) (PI)))) (* angle (- (+ (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* angle (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))) angle)))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* (pow y-scale 2) (PI)))) (* angle (- (+ (* 2 (/ (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))) (pow y-scale 2))) (* angle (- (+ (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (PI)))) (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow y-scale 2) (PI)))) (+ (* -1/97200 (/ (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (+ (* -1/1080 (/ (* (PI) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))) (pow y-scale 2))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (PI) 3))))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (- (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (- (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (+ (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (/ (- (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (- (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (+ (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (PI))) (+ (* -1/97200 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6))))))))) (+ (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6))))))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (* angle (PI))))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 2 (* angle (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI)))) angle)))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2)))))))) angle)))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (pow (sin (* 1/2 (PI))) 2) (PI))) (* angle (+ (* 2 (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* angle (- (+ (* 180 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (PI))) (* angle (- (* 180 (/ (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (PI))) (* -1/97200 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* -1/1080 (* (PI) (pow (sin (* 1/2 (PI))) 2)))))))) angle)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* angle (pow (PI) 3))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (/ (+ (* 2916000 (/ (* angle (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))) (pow (PI) 3))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (/ (+ (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 1/2 (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))) (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3)))))) angle)))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (/ (+ (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 2916000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 1/2 (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))) (* 1/2 (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))))))) angle)))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (* angle (pow (PI) 3))))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* 5832000 (/ (* angle (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))) (pow (PI) 3))) (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3)))) angle)))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3))) (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))))) angle)))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (PI) 3))) (* angle (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))) (pow (PI) 3))) (* angle (- (+ (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))) (pow (PI) 3))) (* angle (- (* 5832000 (/ (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))) (pow (PI) 3))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))) (* 34012224000000 (/ (* (pow x-scale 2) (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))) (pow (PI) 6)))))))) angle)))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2)))))) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* (pow x-scale 2) (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))) (* (pow x-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* angle (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/729000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 4 (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* 1/5832000 (* (pow angle 3) (pow (PI) 3)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/566870400000 (pow (PI) 5)) (* -1/1133740800000 (pow (PI) 5))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/566870400000 (pow (PI) 5)) (+ (* -1/1133740800000 (pow (PI) 5)) (* (pow angle 2) (+ (* 1/734664038400000000 (pow (PI) 7)) (+ (* 1/110199605760000000 (pow (PI) 7)) (* 1/180 (* (PI) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/566870400000 (pow (PI) 5)) (+ (* -1/1133740800000 (pow (PI) 5)) (* (pow angle 2) (+ (* 1/734664038400000000 (pow (PI) 7)) (+ (* 1/110199605760000000 (pow (PI) 7)) (+ (* 1/180 (* (PI) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/71409344532480000000000 (pow (PI) 9)) (+ (* -1/999730823454720000000000 (pow (PI) 9)) (* 1/180 (* (PI) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* 1/90 (/ (* angle (PI)) (pow x-scale 2)))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* angle (+ (* -1/17496000 (/ (* (pow angle 2) (pow (PI) 3)) (pow x-scale 2))) (* 1/90 (/ (PI) (pow x-scale 2)))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* angle (+ (* 1/90 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/17496000 (/ (pow (PI) 3) (pow x-scale 2))) (* 1/11337408000000 (/ (* (pow angle 2) (pow (PI) 5)) (pow x-scale 2)))))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* angle (+ (* 1/90 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/17496000 (/ (pow (PI) 3) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/15427944806400000000 (/ (* (pow angle 2) (pow (PI) 7)) (pow x-scale 2))) (* 1/11337408000000 (/ (pow (PI) 5) (pow x-scale 2)))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* 1/180 (/ (* angle (PI)) (pow x-scale 2)))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* angle (+ (* -1/34992000 (/ (* (pow angle 2) (pow (PI) 3)) (pow x-scale 2))) (* 1/180 (/ (PI) (pow x-scale 2)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) (pow x-scale 2))) (* 1/22674816000000 (/ (* (pow angle 2) (pow (PI) 5)) (pow x-scale 2)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/30855889612800000000 (/ (* (pow angle 2) (pow (PI) 7)) (pow x-scale 2))) (* 1/22674816000000 (/ (pow (PI) 5) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* -1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1 (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))))) (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1 (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))) (* -1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (/ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) #s(hole binary64 (+ (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (+ (* 2 (* angle (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 1/16200 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/32400 (* angle (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* angle (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (+ (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/3149280000 (* angle (* (pow (PI) 4) (* (cos (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 3)))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) #s(hole binary64 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (/ y-scale x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) x-scale))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))) x-scale))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))) (pow x-scale 2)))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) #s(hole binary64 (* -1 (/ (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 2)))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 2))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* 1/32400 (pow (PI) 2)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (/ (pow (PI) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (PI) 2) (pow x-scale 2))))
#s(approx (pow x-scale 2) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (+ (* 2 (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow x-scale 2))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1 (* (pow x-scale 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/32400 (pow (PI) 2))) (pow x-scale 2))))
#s(approx (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) #s(hole binary64 (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
#s(approx (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) #s(hole binary64 (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) #s(hole binary64 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (* (pow x-scale 2) (pow y-scale 2)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 3))))))) (pow x-scale 2))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) y-scale)) (* 2 (* y-scale (sin (* 1/180 (* angle (PI))))))) (pow x-scale 2))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (pow y-scale 2))) (* 2 (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) #s(hole binary64 (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale)))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (* 2 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (+ (* 2 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow x-scale 2)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2)))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (* -1 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* y-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 3)))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2))))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* -1 (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))))))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) #s(hole binary64 (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))))))
#s(approx (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) #s(hole binary64 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (pow y-scale 2) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) #s(hole binary64 (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) #s(hole binary64 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow y-scale 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/2 (* (pow y-scale 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (* 2 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2)))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (+ (* 2 (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 4)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 4)))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (/ (+ (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* 1/32400 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (/ (+ (* -1 (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* 1/32400 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (* -1 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2)))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (/ (- (* 1/32400 (/ (* (pow y-scale 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (/ (- (+ (* -2 (/ (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) y-scale))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (/ (+ (* -1 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 2 (/ (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))) y-scale)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 2 (/ (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) #s(hole binary64 (* -1 (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) #s(hole binary64 (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) #s(hole binary64 (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) #s(hole binary64 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* 2 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2)))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))))) (pow y-scale 2))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) #s(hole binary64 (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) #s(hole binary64 (* -1 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 (neg.f64 y-scale) (neg.f64 x-scale))
(/.f64 y-scale x-scale)
y-scale
x-scale
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(literal -2 binary64)
(/.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (neg.f64 (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
(*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
(-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))
(fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))
(+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))
#s(literal -1/32400 binary64)
(/.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(pow.f64 (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(*.f64 (PI.f64) (PI.f64))
(pow.f64 (PI.f64) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (neg.f64 y-scale) (neg.f64 y-scale))
(*.f64 (fabs.f64 y-scale) (fabs.f64 y-scale))
(*.f64 y-scale y-scale)
(pow.f64 y-scale #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))
(*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))
#s(literal 1/32400 binary64)
(/.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(pow.f64 (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (neg.f64 (*.f64 (PI.f64) (PI.f64))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))
(*.f64 (neg.f64 x-scale) (neg.f64 x-scale))
(*.f64 (fabs.f64 x-scale) (fabs.f64 x-scale))
(*.f64 x-scale x-scale)
(pow.f64 x-scale #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))
(-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))
(*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))
(*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))
#s(literal 1/8100 binary64)
(*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))
(*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))
(/.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))
(*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))
#s(literal -1 binary64)
(*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale))
(-.f64 (/.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))
(-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (fabs.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fabs.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(literal 4 binary64)
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 3 binary64)))
#s(literal 3 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))
(/.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (-.f64 (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(/.f64 (neg.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
(*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/.f64 (*.f64 y-scale #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/.f64 (neg.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (neg.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 (*.f64 b b) (*.f64 a a))))))
(/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
a
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))
(-.f64 (*.f64 b b) (*.f64 a a))
(*.f64 (neg.f64 b) (neg.f64 b))
(*.f64 (fabs.f64 b) (fabs.f64 b))
(*.f64 b b)
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
b
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 b b)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* a a) (*.f64 a a))
#s(approx a a)
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (- (* b b) (* a a)) (*.f64 b b))
#s(approx (- (* b b) (* a a)) (fma.f64 #s(literal -1 binary64) (*.f64 a a) (*.f64 b b)))
#s(approx (* a a) (*.f64 a a))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 a a)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 a a)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 a a)))))
#s(approx (- (* b b) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 a a)))
#s(approx (- (* b b) (* a a)) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 b b) (*.f64 a a)) #s(literal 1 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 a a)))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a a)))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a a)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (- (* b b) (* a a)) (-.f64 (*.f64 b b) (*.f64 a a)))
#s(approx (* b b) (*.f64 b b))
#s(approx b b)
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b b)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 b b)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (*.f64 b b) (+.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 b b))))))
#s(approx (- (* b b) (* a a)) (*.f64 (*.f64 b b) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a a) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) angle) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/48600 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) angle) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/48600 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) angle) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) (PI.f64)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/48600 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 angle (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 angle (fma.f64 #s(literal -1/6298560000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 angle (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/6298560000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* 1/180 (* angle (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx angle angle)
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -90 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/11664000 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (PI.f64)) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (PI.f64))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 angle y-scale)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale (PI.f64))) (*.f64 angle (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) y-scale) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) angle))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))) (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) y-scale) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) angle))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale (PI.f64))) (*.f64 angle (fma.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 y-scale (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) y-scale) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) angle))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 angle y-scale))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) y-scale))) angle))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) y-scale) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))) (*.f64 angle (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))))) angle))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) y-scale) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 y-scale (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))))) angle))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 angle (*.f64 y-scale y-scale)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 y-scale y-scale)))) angle))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) angle))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))))) angle))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 angle (*.f64 y-scale y-scale))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (PI.f64))) (*.f64 angle (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) angle))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (PI.f64))) (*.f64 angle (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) angle))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (PI.f64))) (*.f64 angle (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal -1/1080 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))) angle))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) angle))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) angle))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64)) (*.f64 angle (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (PI.f64))) (fma.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) angle))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/.f64 (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64)) (*.f64 angle (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (PI.f64))) (fma.f64 #s(literal -1/97200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) (fma.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) angle))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (PI.f64)))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64)))) angle))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (PI.f64))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) angle))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (PI.f64))) (*.f64 #s(literal -1/97200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) angle))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (*.f64 #s(literal 2916000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) angle) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/.f64 (fma.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) angle))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/.f64 (fma.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))) angle))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/.f64 (fma.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (fma.f64 #s(literal 2916000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))) angle))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (*.f64 #s(literal 5832000 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) angle) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (/.f64 (fma.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) angle))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (/.f64 (fma.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (fma.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) angle))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (/.f64 (fma.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (fma.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (-.f64 (fma.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 angle (-.f64 (*.f64 #s(literal 5832000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))))) (*.f64 #s(literal 34012224000000 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))) angle))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (fma.f64 angle (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))) (*.f64 angle (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (+.f64 (*.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))))))))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2916000 binary64) (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 4 binary64) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) (*.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) (*.f64 (*.f64 (*.f64 angle angle) angle) (fma.f64 #s(literal 1/5832000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) (*.f64 (*.f64 (*.f64 angle angle) angle) (fma.f64 #s(literal 1/5832000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/734664038400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (fma.f64 #s(literal 1/110199605760000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) (*.f64 (*.f64 (*.f64 angle angle) angle) (fma.f64 #s(literal 1/5832000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/566870400000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (fma.f64 #s(literal -1/1133740800000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/734664038400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (fma.f64 #s(literal 1/110199605760000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (fma.f64 #s(literal -1/71409344532480000000000 binary64) (pow.f64 (PI.f64) #s(literal 9 binary64)) (fma.f64 #s(literal -1/999730823454720000000000 binary64) (pow.f64 (PI.f64) #s(literal 9 binary64)) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))))))))))))))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (PI.f64)) (*.f64 x-scale x-scale))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (*.f64 angle (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale x-scale))))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/15427944806400000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/11337408000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 angle (PI.f64)) (*.f64 x-scale x-scale))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale x-scale))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 1/45 binary64) (*.f64 angle (*.f64 (*.f64 b b) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/1574640000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))
#s(approx (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 3) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx (/ y-scale x-scale) (/.f64 y-scale x-scale))
#s(approx x-scale x-scale)
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale)))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x-scale x-scale))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (pow (PI) 2) (pow x-scale 2)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))
#s(approx (pow x-scale 2) (*.f64 x-scale x-scale))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)))
#s(approx (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))
#s(approx (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))
#s(approx (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))
#s(approx (* (pow x-scale 2) (pow y-scale 2)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) y-scale) (*.f64 #s(literal 2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2)) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)))
#s(approx (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) x-scale))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (+.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) y-scale))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))))
#s(approx y-scale y-scale)
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (*.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))))))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))))))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))))))
#s(approx (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale)))
#s(approx (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))
#s(approx (pow y-scale 2) (*.f64 y-scale y-scale))
#s(approx (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))
#s(approx (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale)))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))))))) (*.f64 y-scale y-scale)))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale)))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))))) (*.f64 y-scale y-scale)))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (/.f64 (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))) (*.f64 y-scale y-scale)))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 y-scale y-scale)))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale))))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (/.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (*.f64 y-scale (PI.f64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) y-scale))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) y-scale))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) y-scale)))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) y-scale))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale))))
#s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (*.f64 #s(literal -1 binary64) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))
#s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)))
#s(approx (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#s(approx (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))
#s(approx (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))
#s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))))))

eval719.0ms (1%)

Memory
32.7MiB live, 1 251.3MiB allocated; 158ms collecting garbage
Compiler

Compiled 895 716 to 17 578 computations (98% saved)

prune9.1s (13.2%)

Memory
104.7MiB live, 18 097.6MiB allocated; 1.2s collecting garbage
Pruning

32 alts after pruning (32 fresh and 0 done)

PrunedKeptTotal
New1 607251 632
Fresh8715
Picked505
Done000
Total1 620321 652
Accuracy
78.9%
Counts
1 652 → 32
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.5%
(*.f64 #s(literal 180 binary64) (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (neg.f64 (PI.f64))))
29.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
32.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
30.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
8.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
31.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle)))))) (PI.f64)))
▶41.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
42.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (PI.f64)))
32.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (PI.f64)))
▶43.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64)))
42.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
38.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
24.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
▶17.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 #s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
17.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
22.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
9.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
24.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
▶37.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
6.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
40.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale #s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64)))
39.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) #s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (PI.f64)))
40.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
42.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
19.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
13.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
▶19.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
Compiler

Compiled 26 400 to 6 804 computations (74.2% saved)

series1.3s (1.9%)

Memory
-321.4MiB live, 1 623.3MiB allocated; 1.2s collecting garbage
Counts
120 → 422
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))
(/.f64 y-scale x-scale)
y-scale
x-scale
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))
(*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))
#s(literal -2 binary64)
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))
(fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))
#s(literal 1/2 binary64)
(/.f64 (PI.f64) angle)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(literal -1 binary64)
(*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 angle x-scale)
(/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(literal 1/32400 binary64)
(*.f64 (PI.f64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))
(*.f64 y-scale y-scale)
(fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))
#s(literal -1/16200 binary64)
(/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))
#s(literal 1/8100 binary64)
(*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
(*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)))
(fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(pow.f64 x-scale #s(literal 2 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(literal 4 binary64)
(pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))
(pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))
(+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (+ (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 360 (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/48600 (/ (* (pow b 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))) (- (pow b 2) (pow a 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1/90 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* 1/16200 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* -2 (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* -2 (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 2 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI)))))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/180 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* -1/32400 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (* 1/2 (/ (PI) angle))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (/ (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) angle)))
#s(approx (* 1/2 (/ (PI) angle)) #s(hole binary64 (* 1/2 (/ (PI) angle))))
#s(approx (/ (PI) angle) #s(hole binary64 (/ (PI) angle)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -90 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))))
#s(approx (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ angle x-scale) #s(hole binary64 (/ angle x-scale)))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (* 1/2 (PI))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (* angle (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (+ (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* -1/16200 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/1574640000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2)))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -2 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2)))))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -2 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -2 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* 1/180 (/ (* angle (PI)) x-scale))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* angle (+ (* -1/34992000 (/ (* (pow angle 2) (pow (PI) 3)) x-scale)) (* 1/180 (/ (PI) x-scale))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) x-scale)) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) x-scale)) (* 1/22674816000000 (/ (* (pow angle 2) (pow (PI) 5)) x-scale))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) x-scale)) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) x-scale)) (* (pow angle 2) (+ (* -1/30855889612800000000 (/ (* (pow angle 2) (pow (PI) 7)) x-scale)) (* 1/22674816000000 (/ (pow (PI) 5) x-scale))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* -1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1 (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))))) (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1 (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))) (* -1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (/ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* angle (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/729000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 4 (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (+ (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3)))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* 1/2 (PI)) (* angle (- (* -1 (* angle (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* 1/2 (PI)) (* angle (- (* angle (- (* -1/90 (* angle (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/180 (PI)))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* 1/8 (pow (PI) 3))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3)))))
#s(approx (pow (* 1/180 (* angle (PI))) 3) #s(hole binary64 (* 1/5832000 (* (pow angle 3) (pow (PI) 3)))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/4 (pow (PI) 2))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* -1/360 (* angle (pow (PI) 2))) (* 1/4 (pow (PI) 2)))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* 1/4 (pow (PI) 2)) (* angle (- (* 1/32400 (* angle (pow (PI) 2))) (* 1/360 (pow (PI) 2)))))))
#s(approx (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* 1/4 (pow (PI) 2))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (* -1/360 (* angle (pow (PI) 2))) (* 1/4 (pow (PI) 2)))))
#s(approx (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/360 (* angle (pow (PI) 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 360 (/ (sin (* 1/2 (PI))) (* angle (PI))))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* 2 (* angle (cos (* 1/2 (PI))))) (* 360 (/ (sin (* 1/2 (PI))) (PI)))) angle)))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* 360 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (* 2 (cos (* 1/2 (PI)))) (* 2 (* angle (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI))))))))))) angle)))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* 360 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (* 2 (cos (* 1/2 (PI)))) (* angle (+ (* 2 (* (pow angle 2) (- (* 1/139968000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))) (* 1/699840000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* 2 (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))))))) angle)))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (sin (* 1/2 (PI))) (* angle (PI))))))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (sin (* 1/2 (PI))) (PI))) (* angle (cos (* 1/2 (PI))))) angle)))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (cos (* 1/2 (PI))) (* angle (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))))) angle)))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (cos (* 1/2 (PI))) (* angle (- (+ (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* (pow angle 2) (- (* 1/139968000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))) (* 1/699840000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (* 1/180 (PI))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) x-scale)))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2)))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2))))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (- (+ (* -1 (/ (+ (* -45 (PI)) (* 45 (PI))) (pow angle 2))) (* 1/180 (PI))) (* -1/2 (/ (PI) angle))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (- (+ (* -90 (/ (+ (* -45 (PI)) (* 45 (PI))) (pow angle 3))) (* 1/180 (PI))) (+ (* -45 (/ (PI) (pow angle 2))) (+ (* -1/2 (/ (PI) angle)) (* 45 (/ (PI) (pow angle 2)))))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* 1/5832000 (* (pow angle 3) (pow (PI) 3)))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* 1/8 (/ (pow (PI) 3) (pow angle 3)))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/360 (/ (pow (PI) 2) angle)) (* 1/32400 (pow (PI) 2))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow angle 2) (- (+ (* 1/32400 (pow (PI) 2)) (* 1/4 (/ (pow (PI) 2) (pow angle 2)))) (* 1/360 (/ (pow (PI) 2) angle))))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* -1/360 (* angle (pow (PI) 2)))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* angle (- (* 1/4 (/ (pow (PI) 2) angle)) (* 1/360 (pow (PI) 2))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1 (* angle (+ (* -1 (/ (- (+ (* -45 (/ (PI) angle)) (* 45 (/ (PI) angle))) (* -1/2 (PI))) angle)) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1 (* angle (+ (* -1 (/ (- (* -1 (/ (- (* -90 (/ (+ (* -45 (PI)) (* 45 (PI))) angle)) (+ (* -45 (PI)) (* 45 (PI)))) angle)) (* -1/2 (PI))) angle)) (* -1/180 (PI)))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* -1 (* (pow angle 3) (+ (* -1/8 (/ (pow (PI) 3) (pow angle 3))) (* -1/5832000 (pow (PI) 3)))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (/ (- (* -1/4 (/ (pow (PI) 2) angle)) (* -1/360 (pow (PI) 2))) angle)) (* 1/32400 (pow (PI) 2))))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* -1 (* angle (- (* -1/4 (/ (pow (PI) 2) angle)) (* -1/360 (pow (PI) 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (/ y-scale x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (pow x-scale 2) #s(hole binary64 (pow x-scale 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* (PI) (sin (* 1/2 (PI)))))))
#s(approx (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) #s(hole binary64 (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) #s(hole binary64 (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) #s(hole binary64 (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
Calls

15 calls:

TimeVariablePointExpression
450.0ms
a
@-inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (* 1/2 (/ (PI) angle)) 1/2 (/ (PI) angle) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) 1/32400 (* (PI) (PI)) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) 1/8100 (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) 2 (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) (/ (sin (* 1/180 (* angle (PI)))) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (pow (* 1/180 (* angle (PI))) 3) 3 (pow (* 1/2 (PI)) 3) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))
137.0ms
angle
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (* 1/2 (/ (PI) angle)) 1/2 (/ (PI) angle) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) 1/32400 (* (PI) (PI)) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) 1/8100 (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) 2 (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) (/ (sin (* 1/180 (* angle (PI)))) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (pow (* 1/180 (* angle (PI))) 3) 3 (pow (* 1/2 (PI)) 3) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))
69.0ms
y-scale
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (* 1/2 (/ (PI) angle)) 1/2 (/ (PI) angle) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) 1/32400 (* (PI) (PI)) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) 1/8100 (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) 2 (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) (/ (sin (* 1/180 (* angle (PI)))) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (pow (* 1/180 (* angle (PI))) 3) 3 (pow (* 1/2 (PI)) 3) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))
54.0ms
x-scale
@-inf
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (* 1/2 (/ (PI) angle)) 1/2 (/ (PI) angle) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) 1/32400 (* (PI) (PI)) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) 1/8100 (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) 2 (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) (/ (sin (* 1/180 (* angle (PI)))) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (pow (* 1/180 (* angle (PI))) 3) 3 (pow (* 1/2 (PI)) 3) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))
53.0ms
b
@0
((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ y-scale x-scale) y-scale x-scale (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (* 1/2 (/ (PI) angle)) 1/2 (/ (PI) angle) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) 1/32400 (* (PI) (PI)) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))) (sin (* 1/2 (PI))) (* 1/2 (PI)) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) 1/8100 (* (PI) (sin (* 1/2 (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (/ (PI) 2) 2 (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) (/ (sin (* 1/180 (* angle (PI)))) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) 4 (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (pow (* 1/180 (* angle (PI))) 3) 3 (pow (* 1/2 (PI)) 3) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))

rewrite827.0ms (1.2%)

Memory
73.3MiB live, 1 433.6MiB allocated; 214ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03571162878
03769137380
011144134467
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
542 → 661
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))
(/.f64 y-scale x-scale)
y-scale
x-scale
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))
(*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))
#s(literal -2 binary64)
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))
(fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))
#s(literal 1/2 binary64)
(/.f64 (PI.f64) angle)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(literal -1 binary64)
(*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 angle x-scale)
(/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(literal 1/32400 binary64)
(*.f64 (PI.f64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))
(*.f64 y-scale y-scale)
(fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))
#s(literal -1/16200 binary64)
(/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))
#s(literal 1/8100 binary64)
(*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
(*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
(/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)))
(fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(pow.f64 x-scale #s(literal 2 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(literal 4 binary64)
(pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))
(pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))
(+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (- (+ (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (+ (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (- (+ (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2)))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (+ (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* -2 (/ (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (sin (* 1/180 (* angle (PI)))))))) (pow b 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))))) angle)))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (+ (* -1/2 (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* angle (+ (* -1/2 (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (* y-scale (sin (* 1/2 (PI))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* angle (- (* 360 (/ (* (pow b 2) (* y-scale (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* -1/48600 (/ (* (pow b 2) (* y-scale (* (pow (PI) 2) (cos (* 1/2 (PI)))))) (* x-scale (- (pow b 2) (pow a 2))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* y-scale (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* x-scale (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 2 (/ (* (pow b 2) (* y-scale (cos (* 1/2 (PI))))) (* x-scale (- (pow b 2) (pow a 2)))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) (sin (* 1/2 (PI)))) (* (PI) (- (pow b 2) (pow a 2))))) (* angle (- (+ (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* angle (- (+ (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (* angle (- (* 360 (/ (* (pow b 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* -1/48600 (/ (* (pow b 2) (* (pow (PI) 2) (cos (* 1/2 (PI))))) (- (pow b 2) (pow a 2)))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* 2 (* (pow b 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2)))))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))) (* (PI) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 4 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) (sin (* 1/2 (PI))))) (* 64800 (/ (* (pow b 2) (+ (* -1/11664000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))) (* -1/34992000 (* (pow (PI) 3) (* (sin (* 1/2 (PI))) (- (pow b 2) (pow a 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 2 (/ (* (pow b 2) (cos (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))) angle)))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1/90 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* 1/16200 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* -2 (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (PI) (sin (* 1/2 (PI))))) (* angle (+ (* 1/16200 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* -2 (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 2 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI)))))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/180 (/ (* angle (PI)) (sin (* 1/2 (PI)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* -1/32400 (/ (* angle (* (pow (PI) 2) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) (sin (* 1/2 (PI))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/6298560000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/2099520000 (/ (* (pow (PI) 4) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (* -1/34992000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (pow (cos (* 1/2 (PI))) 2)) (pow (sin (* 1/2 (PI))) 3))) (* -1/11664000 (/ (pow (PI) 3) (sin (* 1/2 (PI)))))))) (* 1/32400 (/ (* (pow (PI) 2) (cos (* 1/2 (PI)))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (* 1/2 (/ (PI) angle))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (/ (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) angle)))
#s(approx (* 1/2 (/ (PI) angle)) #s(hole binary64 (* 1/2 (/ (PI) angle))))
#s(approx (/ (PI) angle) #s(hole binary64 (/ (PI) angle)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -90 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* angle (+ (* -90 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/2 (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (* -1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* angle (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (+ (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (* angle (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* -1/97200 (/ (* x-scale (* y-scale (* (pow (PI) 2) (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI)))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (sin (* 1/2 (PI))))) (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2)))) (* (PI) (sin (* 1/2 (PI))))))))))) (+ (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* (PI) (sin (* 1/2 (PI)))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))) (sin (* 1/2 (PI))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (* -1/34992000 (* (pow (PI) 3) (sin (* 1/2 (PI)))))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* y-scale (* (cos (* 1/2 (PI))) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))))
#s(approx (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ angle x-scale) #s(hole binary64 (/ angle x-scale)))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (* 1/2 (PI))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* -1/180 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 2))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/11664000 (/ (* x-scale (* (pow (PI) 3) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/32400 (/ (* x-scale (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 3))) (* -1/64800 (/ (* x-scale (pow (PI) 2)) (sin (* 1/2 (PI)))))))) (* 1/180 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 2))))) (/ x-scale (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* 1/180 (* (PI) (cos (* 1/2 (PI))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* -1/34992000 (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (* angle (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))) (PI)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (+ (* 180 (/ (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* angle (- (+ (* 180 (/ (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (PI))) (* angle (- (* 180 (/ (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))) (PI))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* -1/1080 (* y-scale (* (PI) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* angle (+ (* angle (* y-scale (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))) (* y-scale (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* y-scale (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* angle (- (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* angle (- (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (* (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))))) (pow y-scale 2))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* 1/11337408000000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (+ (* 1/2267481600000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* 1/1133740800000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow y-scale 2))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (* 1/2 (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/12597120000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/4199040000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))))) (pow y-scale 2))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI)))))))) (sin (* 1/2 (PI))))) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) 2)) (pow (sin (* 1/2 (PI))) 4)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* 1/2 (/ (* (pow y-scale 2) (- (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))))) (pow y-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* -1/16200 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/1574640000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2)))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -2 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2)))))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -2 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -2 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* 1/180 (/ (* angle (PI)) x-scale))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* angle (+ (* -1/34992000 (/ (* (pow angle 2) (pow (PI) 3)) x-scale)) (* 1/180 (/ (PI) x-scale))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) x-scale)) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) x-scale)) (* 1/22674816000000 (/ (* (pow angle 2) (pow (PI) 5)) x-scale))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (* angle (+ (* 1/180 (/ (PI) x-scale)) (* (pow angle 2) (+ (* -1/34992000 (/ (pow (PI) 3) x-scale)) (* (pow angle 2) (+ (* -1/30855889612800000000 (/ (* (pow angle 2) (pow (PI) 7)) x-scale)) (* 1/22674816000000 (/ (pow (PI) 5) x-scale))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* -1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1 (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))))) (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* angle (+ (* -1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1 (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))) (* -1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2 (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (/ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))) (* angle (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (+ (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* angle (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (+ (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))) (* 4 (/ (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4)))))) (sin (* 1/2 (PI))))) (+ (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))) (pow (sin (* 1/2 (PI))) 4)) (/ (* (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 2)))))))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -1/1458000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI)))))) (* 1/729000 (/ (* (pow (PI) 3) (cos (* 1/2 (PI)))) (* (pow x-scale 2) (sin (* 1/2 (PI))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3)))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 3))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -1/1458000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -2 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (+ (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))) (* angle (+ (* -2 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))) (* 4 (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/2916000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))) (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/2916000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (+ (* 1/2916000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))) (* angle (+ (* -1/283435200000 (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* 1/32400 (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* 1/32400 (pow (PI) 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 2)))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/729000 (/ (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2))))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 4 (* angle (+ (* -1/283435200000 (/ (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (pow x-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (pow x-scale 2)))))))))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (+ (* 2 (* (sin (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))) (* 2 (* (sin (* 1/2 (PI))) (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3)))))))))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 1/180 (* angle (* (PI) (cos (* 1/2 (PI)))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* angle (+ (* 1/180 (* (PI) (cos (* 1/2 (PI))))) (* angle (+ (* -1 (* (cos (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (sin (* 1/2 (PI))))) (* angle (+ (* 1/180 (* (PI) (* (sin (* 1/2 (PI))) (+ (* -1/16200 (PI)) (* 1/16200 (PI)))))) (* (cos (* 1/2 (PI))) (+ (* -1/90 (+ (* -1/16200 (PI)) (* 1/16200 (PI)))) (* -1/34992000 (pow (PI) 3))))))))))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* 1/2 (PI)) (* angle (- (* -1 (* angle (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* 1/2 (PI)) (* angle (- (* angle (- (* -1/90 (* angle (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (+ (* -1/16200 (PI)) (* 1/16200 (PI))))) (* -1/180 (PI)))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* 1/8 (pow (PI) 3))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3)))))
#s(approx (pow (* 1/180 (* angle (PI))) 3) #s(hole binary64 (* 1/5832000 (* (pow angle 3) (pow (PI) 3)))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/4 (pow (PI) 2))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* -1/360 (* angle (pow (PI) 2))) (* 1/4 (pow (PI) 2)))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* 1/4 (pow (PI) 2)) (* angle (- (* 1/32400 (* angle (pow (PI) 2))) (* 1/360 (pow (PI) 2)))))))
#s(approx (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* 1/4 (pow (PI) 2))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (+ (* -1/360 (* angle (pow (PI) 2))) (* 1/4 (pow (PI) 2)))))
#s(approx (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/360 (* angle (pow (PI) 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 360 (/ (sin (* 1/2 (PI))) (* angle (PI))))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* 2 (* angle (cos (* 1/2 (PI))))) (* 360 (/ (sin (* 1/2 (PI))) (PI)))) angle)))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* 360 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (* 2 (cos (* 1/2 (PI)))) (* 2 (* angle (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI))))))))))) angle)))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* 360 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (* 2 (cos (* 1/2 (PI)))) (* angle (+ (* 2 (* (pow angle 2) (- (* 1/139968000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))) (* 1/699840000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* 2 (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))))))) angle)))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 180 (/ (sin (* 1/2 (PI))) (* angle (PI))))))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (sin (* 1/2 (PI))) (PI))) (* angle (cos (* 1/2 (PI))))) angle)))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (cos (* 1/2 (PI))) (* angle (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))))) angle)))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* 180 (/ (sin (* 1/2 (PI))) (PI))) (* angle (+ (cos (* 1/2 (PI))) (* angle (- (+ (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* (pow angle 2) (- (* 1/139968000 (* (pow (PI) 3) (sin (* 1/2 (PI))))) (+ (* -1/194400 (* (pow (PI) 2) (- (* -1/360 (* (PI) (sin (* 1/2 (PI))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))) (* 1/699840000 (* (pow (PI) 3) (sin (* 1/2 (PI))))))))) (* -1/1080 (* (PI) (sin (* 1/2 (PI)))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (sin (* 1/180 (* angle (PI)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (* 1/180 (PI))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) #s(hole binary64 (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) #s(hole binary64 (/ (sin (* 1/180 (* angle (PI)))) x-scale)))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 2)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) #s(hole binary64 (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2)))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2))))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (- (+ (* -1 (/ (+ (* -45 (PI)) (* 45 (PI))) (pow angle 2))) (* 1/180 (PI))) (* -1/2 (/ (PI) angle))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* angle (- (+ (* -90 (/ (+ (* -45 (PI)) (* 45 (PI))) (pow angle 3))) (* 1/180 (PI))) (+ (* -45 (/ (PI) (pow angle 2))) (+ (* -1/2 (/ (PI) angle)) (* 45 (/ (PI) (pow angle 2)))))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* 1/5832000 (* (pow angle 3) (pow (PI) 3)))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* (pow angle 3) (+ (* 1/5832000 (pow (PI) 3)) (* 1/8 (/ (pow (PI) 3) (pow angle 3)))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (pow (PI) 2)))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/360 (/ (pow (PI) 2) angle)) (* 1/32400 (pow (PI) 2))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow angle 2) (- (+ (* 1/32400 (pow (PI) 2)) (* 1/4 (/ (pow (PI) 2) (pow angle 2)))) (* 1/360 (/ (pow (PI) 2) angle))))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* -1/360 (* angle (pow (PI) 2)))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* angle (- (* 1/4 (/ (pow (PI) 2) angle)) (* 1/360 (pow (PI) 2))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1 (* angle (+ (* -1 (/ (- (+ (* -45 (/ (PI) angle)) (* 45 (/ (PI) angle))) (* -1/2 (PI))) angle)) (* -1/180 (PI)))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* -1 (* angle (+ (* -1 (/ (- (* -1 (/ (- (* -90 (/ (+ (* -45 (PI)) (* 45 (PI))) angle)) (+ (* -45 (PI)) (* 45 (PI)))) angle)) (* -1/2 (PI))) angle)) (* -1/180 (PI)))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) #s(hole binary64 (* -1 (* (pow angle 3) (+ (* -1/8 (/ (pow (PI) 3) (pow angle 3))) (* -1/5832000 (pow (PI) 3)))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow angle 2) (+ (* -1 (/ (- (* -1/4 (/ (pow (PI) 2) angle)) (* -1/360 (pow (PI) 2))) angle)) (* 1/32400 (pow (PI) 2))))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) #s(hole binary64 (* -1 (* angle (- (* -1/4 (/ (pow (PI) 2) angle)) (* -1/360 (pow (PI) 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (/ y-scale x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow x-scale 2) (+ (* -1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (pow x-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (sin (* 1/180 (* angle (PI)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 3))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sin (* 1/180 (* angle (PI)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow (sin (/ (+ (* 1/5832000 (* (pow angle 3) (pow (PI) 3))) (* 1/8 (pow (PI) 3))) (- (+ (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (* 1/4 (pow (PI) 2))) (* 1/360 (* angle (pow (PI) 2)))))) 2)))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (pow x-scale 2) #s(hole binary64 (pow x-scale 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sin (* 1/180 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))) x-scale))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/4 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/2 (/ (* x-scale (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/8100 (/ (pow (PI) 2) (pow x-scale 2))))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) #s(hole binary64 (* -1 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (/ (* angle (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))) (* x-scale (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2))))) (* (PI) (sin (* 1/2 (PI)))))))
#s(approx (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) #s(hole binary64 (* y-scale (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) #s(hole binary64 (+ (* 1/32400 (pow (PI) 2)) (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) #s(hole binary64 (* 1/2 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) #s(hole binary64 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (+ (* -1/16200 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/8100 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (pow y-scale 2))))
#s(approx (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) #s(hole binary64 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))))
#s(approx (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) #s(hole binary64 (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sin (* 1/180 (* angle (PI)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (* (sin (* 1/180 (* angle (PI)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* -1/4 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) #s(hole binary64 (* -180 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) #s(hole binary64 (* -1 (/ (* angle (* x-scale (* y-scale (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))) (pow (sin (* 1/2 (PI))) 2))))))) (* (PI) (sin (* 1/2 (PI))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 7) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))))
#s(literal -1/2 binary64)
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))
(/.f64 (neg.f64 y-scale) (neg.f64 x-scale))
(/.f64 y-scale x-scale)
y-scale
x-scale
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))))
(*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))
#s(literal -2 binary64)
(/.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) (PI.f64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))) (*.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))
(fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))
(+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 (PI.f64)) (neg.f64 angle))
(/.f64 (PI.f64) angle)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(literal -1 binary64)
(*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (neg.f64 (*.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (neg.f64 (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (*.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (neg.f64 angle) (neg.f64 x-scale))
(/.f64 angle x-scale)
(*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (neg.f64 (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
(fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(literal 1/32400 binary64)
(*.f64 (neg.f64 (PI.f64)) (neg.f64 (PI.f64)))
(*.f64 (fabs.f64 (PI.f64)) (fabs.f64 (PI.f64)))
(*.f64 (PI.f64) (PI.f64))
(pow.f64 (PI.f64) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))))
(*.f64 (neg.f64 y-scale) (neg.f64 y-scale))
(*.f64 (fabs.f64 y-scale) (fabs.f64 y-scale))
(*.f64 y-scale y-scale)
(pow.f64 y-scale #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))) (*.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (-.f64 (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (*.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))))))
(fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))))
(+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))))
#s(literal -1/16200 binary64)
(*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(pow.f64 (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (fabs.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fabs.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))
#s(literal 1/8100 binary64)
(*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (neg.f64 x-scale) (neg.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (neg.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
(*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(*.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(*.f64 (fabs.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (fabs.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
(/.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 x-scale))
(/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 x-scale (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
(*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (-.f64 (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(/.f64 (neg.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (neg.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (fabs.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fabs.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (neg.f64 x-scale) (neg.f64 x-scale))
(*.f64 (fabs.f64 x-scale) (fabs.f64 x-scale))
(*.f64 x-scale x-scale)
(pow.f64 x-scale #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(literal 4 binary64)
(*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (*.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))))))
(fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))
(fma.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))
(fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))
(+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))
(*.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)))
(pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))
#s(literal 3 binary64)
(*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
(fma.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (neg.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (neg.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 (neg.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (neg.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64))
(-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 (fabs.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(*.f64 (fabs.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (fabs.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
(*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (*.f64 b b))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (*.f64 b b)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 b b)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 a a)))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a a)))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a a)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))) (-.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/1049760000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 #s(literal 1/2267481600000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) angle) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) angle))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/48600 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) angle) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (+.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) angle))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/48600 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) angle) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 angle (-.f64 (*.f64 #s(literal 360 binary64) (*.f64 (/.f64 (*.f64 b b) (PI.f64)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/48600 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 angle (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 angle (fma.f64 #s(literal -1/6298560000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 angle (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/6298560000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))))
#s(approx (* 1/180 (* angle (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx angle angle)
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (/.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) angle))
#s(approx (* 1/2 (/ (PI) angle)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))
#s(approx (/ (PI) angle) (/.f64 (PI.f64) angle))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -90 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 angle (fma.f64 #s(literal -90 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/97200 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (PI.f64)) (/.f64 (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 32400 binary64) (*.f64 (/.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ angle x-scale) (/.f64 angle x-scale))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (fma.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/11664000 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (PI.f64)) (*.f64 angle (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (PI.f64))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 y-scale (*.f64 (PI.f64) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 (*.f64 angle angle) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/11337408000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2267481600000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/4199040000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (*.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/1574640000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)))))))))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 angle (PI.f64)) x-scale)))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) x-scale) (*.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) x-scale)))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) x-scale) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) x-scale) (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))) x-scale)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (/.f64 (PI.f64) x-scale) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) x-scale) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) x-scale) (*.f64 #s(literal 1/22674816000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) x-scale)))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/90 binary64) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/90 binary64) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/90 binary64) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))) (*.f64 angle (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (+.f64 (*.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))))))))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2916000 binary64) (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))))))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 angle (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale)))))))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (fma.f64 #s(literal 4 binary64) (*.f64 angle (fma.f64 #s(literal -1/283435200000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))))))))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/90 binary64) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/90 binary64) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))))))))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1/90 binary64) (*.f64 angle (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (PI.f64) (*.f64 #s(literal 1/16200 binary64) (PI.f64))))) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))))
#s(approx (pow (* 1/180 (* angle (PI))) 3) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (fma.f64 #s(literal -1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 angle (-.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))))
#s(approx (* (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)))))))))))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 360 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (PI.f64)))))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 angle (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal 360 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)))) angle))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 2 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) angle))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (fma.f64 #s(literal 2 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 1/139968000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/194400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/699840000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) angle))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 180 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (PI.f64)))))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) angle))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 angle (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) angle))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 1/139968000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/194400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/699840000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (* -1/2 (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))
#s(approx (* -2 (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))
#s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (* -2 (* (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/ (sin (* 1/180 (* angle (PI)))) x-scale))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
#s(approx (/ (sin (* 1/180 (* angle (PI)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64)))))))))
#s(approx (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -45 binary64) (PI.f64) (*.f64 #s(literal 45 binary64) (PI.f64))) (*.f64 angle angle)) (*.f64 #s(literal 1/180 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle)))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 angle (-.f64 (fma.f64 #s(literal -90 binary64) (/.f64 (fma.f64 #s(literal -45 binary64) (PI.f64) (*.f64 #s(literal 45 binary64) (PI.f64))) (*.f64 (*.f64 angle angle) angle)) (*.f64 #s(literal 1/180 binary64) (PI.f64))) (fma.f64 #s(literal -45 binary64) (/.f64 (PI.f64) (*.f64 angle angle)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal 45 binary64) (/.f64 (PI.f64) (*.f64 angle angle))))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (*.f64 (*.f64 (*.f64 angle angle) angle) (fma.f64 #s(literal 1/5832000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 (PI.f64) angle) #s(literal 3 binary64))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) angle) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 angle angle)))) (*.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) angle)))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (*.f64 #s(literal -1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64)))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (*.f64 angle (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) angle)) (*.f64 #s(literal 1/360 binary64) (*.f64 (PI.f64) (PI.f64))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))
#s(approx (* 2 (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (* angle (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle)))) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (fma.f64 #s(literal -45 binary64) (/.f64 (PI.f64) angle) (*.f64 #s(literal 45 binary64) (/.f64 (PI.f64) angle))) angle) (/.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) angle)) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 #s(literal -90 binary64) (/.f64 (fma.f64 #s(literal -45 binary64) (PI.f64) (*.f64 #s(literal 45 binary64) (PI.f64))) angle)) angle) (/.f64 (fma.f64 #s(literal -45 binary64) (PI.f64) (*.f64 #s(literal 45 binary64) (PI.f64))) angle))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) angle) (*.f64 #s(literal -1/180 binary64) (PI.f64))))))
#s(approx (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 angle angle) angle) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 (PI.f64) angle) #s(literal 3 binary64)) (*.f64 #s(literal -1/5832000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))))
#s(approx (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) angle)) angle) (/.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (PI.f64))) angle)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))))))
#s(approx (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (*.f64 #s(literal -1 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) angle)) (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx (/ y-scale x-scale) (/.f64 y-scale x-scale))
#s(approx x-scale x-scale)
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64))) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))
#s(approx (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2)) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64))))))) (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/360 binary64) (*.f64 angle (*.f64 (PI.f64) (PI.f64)))))))))))
#s(approx (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (pow x-scale 2) (*.f64 x-scale x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))))))) x-scale))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) x-scale))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))))))) x-scale)))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale)))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 7 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) y-scale) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))))
#s(approx y-scale y-scale)
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1 (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ angle x-scale) (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 (/.f64 angle x-scale) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 (/.f64 y-scale (PI.f64)) (/.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* y-scale (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (+ (* 1/32400 (* (PI) (PI))) (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* 1/2 (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (* y-scale y-scale) (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#s(approx (+ (* -1/16200 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)))
#s(approx (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale)) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)))
#s(approx (* 1/8100 (/ (* (* (PI) (PI)) (* (sin (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* 180 (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI)))))) (*.f64 #s(literal -180 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle (PI.f64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))
#s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* -1/2 (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 7 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))
#s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 7 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))))))
#s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale)))))))))

eval468.0ms (0.7%)

Memory
-2.5MiB live, 746.8MiB allocated; 122ms collecting garbage
Compiler

Compiled 633 456 to 11 146 computations (98.2% saved)

prune11.3s (16.4%)

Memory
144.0MiB live, 21 365.0MiB allocated; 1.8s collecting garbage
Pruning

34 alts after pruning (32 fresh and 2 done)

PrunedKeptTotal
New1 075111 086
Fresh62127
Picked325
Done000
Total1 084341 118
Accuracy
79.0%
Counts
1 118 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.5%
(*.f64 #s(literal 180 binary64) (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (neg.f64 (PI.f64))))
29.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
32.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
8.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
43.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
✓41.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
31.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
31.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
40.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) #s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 angle (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) angle)))))))) (PI.f64)))
42.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (PI.f64)))
42.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
38.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
44.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle #s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (/.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) angle)))))))))))) (PI.f64)))
24.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
17.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
25.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
17.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
22.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
9.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
24.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
28.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))))) (PI.f64)))
6.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
40.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale #s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64)))
39.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) #s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (PI.f64)))
24.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
40.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
42.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
19.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
4.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
13.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
✓19.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
Compiler

Compiled 43 360 to 5 115 computations (88.2% saved)

regimes403.0ms (0.6%)

Memory
-0.0MiB live, 573.1MiB allocated; 122ms collecting garbage
Counts
72 → 2
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) #s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale #s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 #s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 #s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle #s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (/.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) angle)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) #s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 angle (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) angle)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 angle (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))) (*.f64 (PI.f64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 64800 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 b b) (*.f64 a a))))))) angle)))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (PI.f64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))) angle)))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/17496000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y-scale (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (*.f64 a a)) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (/.f64 x-scale (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 #s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (cos (* (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (/.f64 (PI.f64) x-scale) (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) y-scale)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -1/34992000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 x-scale y-scale))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 #s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) #s(approx (sin (* (/ angle 180) (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) (neg.f64 (PI.f64))))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
Calls

11 calls:

77.0ms
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
57.0ms
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
40.0ms
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
32.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
30.0ms
a
Results
AccuracySegmentsBranch
50.6%3(/.f64 angle #s(literal 180 binary64))
50.6%3(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
52.7%2(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
52.7%2(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
52.7%2(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
52.7%2(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
57.1%2a
63.1%6b
50.6%3angle
48.5%2x-scale
49.6%2y-scale
Compiler

Compiled 678 to 215 computations (68.3% saved)

regimes42.0ms (0.1%)

Memory
-0.9MiB live, 99.7MiB allocated; 8ms collecting garbage
Counts
45 → 2
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) #s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale #s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 #s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 #s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle #s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (/.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) angle)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) #s(approx (/ (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sin (* 1/180 (* angle (PI))))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)) (*.f64 angle (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 angle (-.f64 (*.f64 #s(literal -1/360 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/1080 binary64) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) angle)))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (+.f64 (/.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
Calls

2 calls:

15.0ms
a
14.0ms
b
Results
AccuracySegmentsBranch
54.4%2b
56.8%2a
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes39.0ms (0.1%)

Memory
15.5MiB live, 96.7MiB allocated; 9ms collecting garbage
Counts
39 → 3
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) #s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale #s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 #s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 #s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle #s(approx (+ (* 1/180 (PI)) (* 1/2 (/ (PI) angle))) (/.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) angle)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) angle))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
Calls

1 calls:

22.0ms
a
Results
AccuracySegmentsBranch
57.9%3a
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes511.0ms (0.7%)

Memory
-70.3MiB live, 184.1MiB allocated; 1.1s collecting garbage
Counts
33 → 2
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (/.f64 (fma.f64 #s(literal 1/5832000 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fabs.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) #s(approx (* y-scale (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale #s(approx (+ (* -1 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sin (* 1/180 (* angle (PI))))) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (pow y-scale 2))) (* 2 (/ (sin (* 1/180 (* angle (PI)))) (pow x-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (exp.f64 (*.f64 (log.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI))))) (*.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 #s(approx (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 x-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(approx (pow (sin (/ (+ (pow (* 1/180 (* angle (PI))) 3) (pow (* 1/2 (PI)) 3)) (+ (* (* 1/180 (* angle (PI))) (* 1/180 (* angle (PI)))) (- (* (* 1/2 (PI)) (* 1/2 (PI))) (* (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) 2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 #s(approx (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale #s(approx (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (-.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
Calls

1 calls:

54.0ms
a
Results
AccuracySegmentsBranch
54.8%2a
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes38.0ms (0.1%)

Memory
35.2MiB live, 35.2MiB allocated; 0ms collecting garbage
Counts
6 → 1
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
Calls

11 calls:

3.0ms
a
3.0ms
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
3.0ms
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
3.0ms
b
3.0ms
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
Results
AccuracySegmentsBranch
42.6%1x-scale
42.6%1(/.f64 angle #s(literal 180 binary64))
42.6%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
42.6%1angle
42.6%1y-scale
42.6%1(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
42.6%1(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
42.6%1(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
42.6%1(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
42.6%1b
42.6%1a
Compiler

Compiled 678 to 215 computations (68.3% saved)

regimes54.0ms (0.1%)

Memory
-20.8MiB live, 68.2MiB allocated; 23ms collecting garbage
Counts
5 → 3
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))
Calls

11 calls:

25.0ms
x-scale
4.0ms
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
2.0ms
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
2.0ms
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
2.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
Results
AccuracySegmentsBranch
23.2%2(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
23.2%2(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
23.2%2(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
23.2%2(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
27.4%3y-scale
22.7%3(/.f64 angle #s(literal 180 binary64))
22.7%3(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
23.9%2b
22.7%3angle
21.3%2a
28.1%3x-scale
Compiler

Compiled 678 to 215 computations (68.3% saved)

regimes30.0ms (0%)

Memory
23.7MiB live, 66.0MiB allocated; 6ms collecting garbage
Accuracy

Total -11.2b remaining (-21.7%)

Threshold costs -11.2b (-21.7%)

Counts
4 → 1
Calls
Call 1
Inputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 angle (fma.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 180 binary64) (*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/729000 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/17496000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
Calls

11 calls:

7.0ms
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
2.0ms
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
2.0ms
angle
2.0ms
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
2.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
Results
AccuracySegmentsBranch
19.5%1(/.f64 angle #s(literal 180 binary64))
19.5%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
19.5%1angle
19.5%1a
19.5%1(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
19.5%1(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
19.5%1(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
19.5%1(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
19.5%1b
19.5%1y-scale
19.5%1x-scale
Compiler

Compiled 678 to 215 computations (68.3% saved)

bsearch165.0ms (0.2%)

Memory
19.7MiB live, 199.7MiB allocated; 80ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
155.0ms
2.0640995357157885e-54
8.400082704490385e-54
Samples
62.0ms24×1valid
55.0ms29×2valid
21.0ms37×0valid
10.0ms6×3valid
Compiler

Compiled 3 484 to 1 101 computations (68.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 132.0ms
ival-cosu: 51.0ms (38.7% of total)
ival-pow2: 24.0ms (18.2% of total)
ival-sinu: 18.0ms (13.7% of total)
adjust: 10.0ms (7.6% of total)
ival-mult: 10.0ms (7.6% of total)
ival-div: 10.0ms (7.6% of total)
ival-sub: 3.0ms (2.3% of total)
ival-sqrt: 2.0ms (1.5% of total)
ival-add: 2.0ms (1.5% of total)
ival-atan: 1.0ms (0.8% of total)
ival-true: 0.0ms (0% of total)
ival-pi: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch97.0ms (0.1%)

Memory
-19.1MiB live, 129.9MiB allocated; 24ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
89.0ms
2.0640995357157885e-54
8.400082704490385e-54
Samples
25.0ms4×3valid
24.0ms25×1valid
24.0ms20×2valid
9.0ms31×0valid
Compiler

Compiled 3 412 to 1 083 computations (68.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 78.0ms
ival-div: 26.0ms (33.3% of total)
ival-pow2: 11.0ms (14.1% of total)
ival-cosu: 10.0ms (12.8% of total)
adjust: 8.0ms (10.2% of total)
ival-sinu: 8.0ms (10.2% of total)
ival-mult: 7.0ms (9% of total)
ival-sub: 3.0ms (3.8% of total)
ival-add: 2.0ms (2.6% of total)
ival-sqrt: 1.0ms (1.3% of total)
ival-atan: 1.0ms (1.3% of total)
ival-pi: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch128.0ms (0.2%)

Memory
11.2MiB live, 103.8MiB allocated; 6ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
115.0ms
2.5722895052253937e+152
1.0222692054372099e+156
3.0ms
2.0640995357157885e-54
8.400082704490385e-54
Samples
67.0ms54×1valid
25.0ms22×2valid
15.0ms52×0valid
Compiler

Compiled 7 796 to 2 495 computations (68% saved)

Precisions
Click to see histograms. Total time spent on operations: 93.0ms
ival-sinu: 24.0ms (25.8% of total)
ival-pow2: 15.0ms (16.1% of total)
ival-cosu: 12.0ms (12.9% of total)
ival-mult: 11.0ms (11.8% of total)
ival-div: 11.0ms (11.8% of total)
adjust: 9.0ms (9.7% of total)
ival-sub: 4.0ms (4.3% of total)
ival-add: 3.0ms (3.2% of total)
ival-sqrt: 2.0ms (2.2% of total)
ival-atan: 1.0ms (1.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-pi: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
9.5MiB live, 9.5MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
3.0ms
2.0640995357157885e-54
8.400082704490385e-54
Compiler

Compiled 3 436 to 1 095 computations (68.1% saved)

bsearch273.0ms (0.4%)

Memory
-1.0MiB live, 322.0MiB allocated; 45ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
146.0ms
3.668355501319069e-82
3.0097058995244988e-77
107.0ms
-1.7799695544566422e-76
-1.8108894229722675e-83
Samples
131.0ms122×1valid
72.0ms149×0valid
19.0ms17×2valid
Compiler

Compiled 24 868 to 5 397 computations (78.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 206.0ms
ival-sinu: 44.0ms (21.4% of total)
ival-cosu: 33.0ms (16% of total)
ival-pow2: 30.0ms (14.6% of total)
ival-sub: 25.0ms (12.1% of total)
ival-mult: 22.0ms (10.7% of total)
ival-div: 22.0ms (10.7% of total)
adjust: 15.0ms (7.3% of total)
ival-add: 6.0ms (2.9% of total)
ival-sqrt: 3.0ms (1.5% of total)
ival-atan: 3.0ms (1.5% of total)
ival-pi: 1.0ms (0.5% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

simplify127.0ms (0.2%)

Memory
3.5MiB live, 101.0MiB allocated; 59ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
03164472
15974458
225164450
Stop Event
1×node limit
Calls
Call 1
Inputs
(if (<=.f64 a #s(literal 5693940736102215/862718293348820473429344482784628181556388621521298319395315527974912 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))))
(if (<=.f64 a #s(literal 5262581589427805/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))))
(if (<=.f64 a #s(literal 5262581589427805/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (if (<=.f64 a #s(literal 5199999999999999775328839517829962696496529116220877815247742974582614215042814372406793441299907178101189990616781951839794851844501095962862062160314368 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))))
(if (<=.f64 a #s(literal 5262581589427805/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(if (<=.f64 x-scale #s(literal -4672471641076991/33374797436264220037422214158899251790667258161822699530422525122222183215322508594108782608384 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64))) (if (<=.f64 x-scale #s(literal 5924026544936899/4171849679533027504677776769862406473833407270227837441302815640277772901915313574263597826048 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
Outputs
(if (<=.f64 a #s(literal 5693940736102215/862718293348820473429344482784628181556388621521298319395315527974912 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))))
(if (<=.f64 a #s(literal 5262581589427805/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))))
(if (<=.f64 a #s(literal 5262581589427805/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (if (<=.f64 a #s(literal 5199999999999999775328839517829962696496529116220877815247742974582614215042814372406793441299907178101189990616781951839794851844501095962862062160314368 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(approx (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (*.f64 #s(literal -2 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 #s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))))
(if (<=.f64 a #s(literal 5262581589427805/1725436586697640946858688965569256363112777243042596638790631055949824 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ y-scale x-scale) (/ (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (PI.f64)))
(if (<=.f64 x-scale #s(literal -4672471641076991/33374797436264220037422214158899251790667258161822699530422525122222183215322508594108782608384 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64))) (if (<=.f64 x-scale #s(literal 5924026544936899/4171849679533027504677776769862406473833407270227837441302815640277772901915313574263597826048 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64)))))
(if (or (<=.f64 x-scale #s(literal -4672471641076991/33374797436264220037422214158899251790667258161822699530422525122222183215322508594108782608384 binary64)) (not (<=.f64 x-scale #s(literal 5924026544936899/4171849679533027504677776769862406473833407270227837441302815640277772901915313574263597826048 binary64)))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 7 binary64))))))))))))) (PI.f64))) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 angle x-scale) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (* (/ x-scale (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (/ (* y-scale (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale))))) (sin (* 1/180 (* angle (PI)))))) (*.f64 #s(literal 180 binary64) #s(approx (/ (* angle (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (PI) (sin (* 1/2 (PI))))) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 angle x-scale)) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (PI.f64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (PI.f64)))

derivations387.0ms (0.6%)

Memory
-12.7MiB live, 369.1MiB allocated; 44ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 4 724 to 326 computations (93.1% saved)

preprocess146.0ms (0.2%)

Memory
35.8MiB live, 213.6MiB allocated; 39ms collecting garbage
Remove

(abs b)

Compiler

Compiled 19 686 to 2 158 computations (89% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...